


REVISTA INDEPENDIENTE PARA USUARIOS DE ORDENADORES AMSTRAD 


ANO II N.° 97 190 PtOS. 


Como llegar al final de 


• Alan Sugar apuesta par una maquina 
con grandes posibilidades grdficas 


Presentadon 

official 



fce «fco fa a 


HOWAMSD 


(AMSTRAD CPC) 


HARDWARE 


Juegos paso 


HOBBY PRESS 


Programas permaweiites 
en memoria 
;aunque se resetee 
el ordenador! 


A 

r -' 


1 

TO 



^ _ . 

r 











































ZAFIRO SOFTWARE DIVISION 
Paseo de la Castellana, 141 28046 Madrid 
Tel. 459 30 04 Telex 22690 ZAFIR E 



fin 

ppm 


Z3 

gjara 

-tM 


A no la • Niimero 97 • 21 al 27 de julio de 1987 • 190 f>tas . (incluido TVA). Cana.rin.ft 180 Mas. 4-70 Max xobretaxa aerea. Ceuta v Afelilla 180 Mas. 





























































































































































































































































































A no III • Numero 97 • 21 nl 27 de Julio de 1987 * 190 ptas. (incluido IVA). Cananas 180 ptas. +10 ptas. sobretasa aerea. Ceuta y Mehlla 180 ptas. 


Director Editorial 
Jose I. Gomez-Centurion 
Director Ejecutivo 
Jose M. a Diaz 
Redactor Jefe 
Juan Jose Martinez 
Diseno y maquetacion 
Valeriano Cenalmor 
Miguel Acquaroni 
Redaccion 

Eduardo Ruiz de Velasco 
Carmen Elias 

Jefe de publicidad 
Mar Lumbreras 
Colaboradores 

Javier Barcelo, David Sopuerta, Robert 
Chatwin, Antonio Cuadra, Pedro 
Sudon, Miguel Sepulveda, Francisco 
Martin, Jesus Alonso, Pedro S. Perez, 
Amalio Gomez, Alberto Suner 
Secretaria Redaccion 
Marisa Cogorro 
Fotografia 
Carlos Candel 
Miguel Lamana 
Ilustradores 

J. Igual, M. Barco, J. S iemens, Pejo 

Edita 

_HOBBY PRESS, S.A._ 

Presidente 
Maria Andrino 
Consejero Delegado 
Jose I. Gomez-Centurion 
Subdirector General 
Andres Aylagas 
Director Gerente 
Fernando Gomez Centurion 
Jefe de Administracion 
Raquel Jimenez 

Jefe de Produccion 
Carlos Peropadre 
Redaccion, Administracion 
y Publicidad 
Ctra. de Irun km 12,400 
(Fuencarral) 28049 Madrid 
Pedidos y suscripciones: 

734 65 00 

Redaccion: 734 70 12 
_ Fax: 734 82 98 _ 

Dto. Circulacion 

Paulino Blanco 

Jefe de Marketing 
Emilio Juarez 
Distribucion 

Coedis, S. A. Valencia, 245 
Barcelona 

Imprime 

ROTEDIC, S. A. Ctra. de 
Irun. km. 12,450 (MADRID) 
Fotocomposicion 
Novocomp, S.A. 

Nicolas Morales, 38-40 
Fotomecanica 

GROF 

Ezequiel Solana, 16 

Deposito Legal: 

_M-28468-1985_ 

Derechos exclusivos 
de la revista 

COMPUTING with 
the AMSTRAD 


Representante para Argentina, Chile, 
Uruguay y Paraguay, Cia. Americana de 
Ediciones, S.R.L. Sud America 1.532. Tel.: 
21 24 64. 1209 BUENOS AIRES (Argentina). 

AMSTRAD Semanal no se hace 
necesariamente solidaria de las opiniones 
vertidas por sus colaboradores en los articulos 
firmados. Reservados todos los derechos. 


D nrante la pasada semana, Amstrad ha vuelto a sorprender a 
sus usuarios con la fulgurante aparicion de su nuevo y ultimo modelo 
de una saga que ya parece interminable. Se trata del PC 1640 
ECD, un ordenador con unas perspectivas grdficas espectaculares, que 
presenta la novedad de integral toda la potencia de una tarjeta EGA 
en su placa central, asi como disponer de un monitor de alta 
resolucion ECB. 

El nuevo ordenador, que segun el importador oficial, Indescomp, 
convivird en pacifica existencia con el 1512, esta destinado 
fundamentalmente a un nutrido grupo de profesionales y aficionados 
que, por sus necesidades o preferencias, busquen una capacidad 
grafica superior. En este numero hacemos una rapida prueba a este 
nuevo equipo. 
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LANLINK 
Ponga sus PC s 
en la red 

El Lanlink, red local sobre PC 
DOS y MS DOS, supone un 
paso en la evolucion de la 
comunicacion entre 
ordenadores, al necesitar un 
menor costo debido a que la 
conexion entre estos se hace a 
traves de software. 

Lanlink utiliza topologia de 
estrella. Uno de los ordenadores 
esta identificado como servidor 
y sus discos e impresora son 
compartidos por todos los 
demas, los satelites. Una 
configuration de este tipo puede 
incluir un ordenador AT 
definido como servidor, y un 
ordenador XT o PC pueden ser 
satelites, compartiendo los 
discos e impresoras del servidor 
Los tres operadores pueden 
utilizar los recursos del 
servidor concurrentemente. 
Adicionalmente cada operador 
de satelite podra usar 
normalmente sus discos e 
impresoras. 

El Lanlink pertenece a The 
Software Link y esta distribuido 
en Espana por Informatica 
Distribuidora, cuya direction en 
Madrid es: C/ Carranza, 10. 

1 ° izqda Tel. 593 27 88. 

28004 Madrid 



Robotica e 
Informatica 
al servicio 
de la industria 

En Italia estan convencidos 
de que la unica manera de que 
se conozcan sus avances 
tecnologicos es llevar su 
productos al resto de los paises. 
Por esta razon estan realizando 
una campana de propaganda 
organizada por el Instituto 
Italiano para el Comercio 
Exterior. La muestra se 
expondra, durante los proximos 
cinco anos en la mayoria de los 
paises europeos y Estados 
Unidos. 


En Espana han estado en la 
Feria Internacional de Muestras 
de Barcelona, donde han 
presentado interesantes 
innovaciones en campos tan 
diversos como la ceramica, la 
mecanica, la informatica o las 
telecomunicaciones. Aunque 
quiza lo que mas curiosidad 
despierta, en este tipo de 
certamenes, son los articulos 
que podrfamos llamar futuristas, 
como los proyectos de robotica 
y las redes de comunicaciones 
domesticas a traves de satelite. 

Una de las novedades que se 
han presentado es un robot 
antropomorfo con estructura de 
fibra de carbono. Es un hecho 
que en muchas fabricas, de casi 
todo el mundo occidental, se 
estan utilizando los brazos 
mecanicos o robots para la 
construction de diversas piezas 
y para trabajos mecanicos de 
gran precision, que actuan 
deacuerdo con las instrucciones 
que reciben a traves de 
ordenadores. Pero hasta hace 
poco tiempo eran rigidos. Ahora 
se hace cada vez mas necesario 
equipos flexibles que se puedan 
utilizar en lugares diferentes y 
con programas que scan 
facilmente modificables, de ahf 
la importancia de esta 
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MACIZAS NO, 
GRACIAS 

La companfa britanica Palace 
Software esta siendo 
enormemente criticada por el 
hecho de haber utilized© una 
modelo bastante ligerita de ropa 
(y muy bien proporcionada, por 
cierto) para la ilustracion de la 
caratula del Barbarian. 

Esta polemica esta siendo 
protagonizada por los grandes 
almacenes Dixon, una de las 
cadenas de mas renombre en 
Gran Bretana y que viene a ser 
el equivalente a El Corte Ingles 
en Espana, quien ha dado un 
ultimatum a Palace con objeto de 
que cambie la tan discutida 
fotografi'a de la portada. De no 
acceder, el juego sera 
inmediatamente retirado de la 
venta en dicha red comercial. 


Ante esta puritana y drastica 
petition, Palace se ha visto 
obligada a acceder (de mala 
gana, por supuestoj. El hecho es 
ue ya ha iniciado la production 
e un nuevo diseno artfstico 
especialmente para Dixon. 

Hasta el momento, ningun otro 
comercio ha puesto pegas a la 
sugerente fotografi'a, la cual, 
como bien conocen nuestros 
lectores, representa a una 
exuberante joven y a un hombre, 
igualmente ligero de ropas, 
ambos haciendo alarde de sus 
encantos personales. 

OCEAN OBTIINi 
IDS DERECHOS 
DE PLATOON 

Ocean Software se ha llevado 
el gato al agua al conseguir los 
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estructura de fibra de Carbono. 

Segun fuentes del Instituto 
Italiano. las razones que han 
hecho posible el desarrollo de la 
robotica industrial en Italia se 
encuentran en la necesidad de 
automatization de las empresas 
para poder competir en el 
mercado actual, como pueden 
ser Fiat y Alfa Romeo en el 
sector automovillstico o Zanussis 
en los electrodomesticos, y el 
esfuerzo de la investigation en 
el campo de los brazos 
mecanicos y eletronicos. Por eso 
se estan realizando una sene de 
proyectos, que ya estan en fase 
de experimentacion, para 
avanzar en este terreno y crear 
una industria propia 

Actualmente existen en Italia 
52 fabricantes, 23 importadores 
y 4 fabricantes/importadores 
que en 1985 facturaron un total 
de 128.000 millones de liras, de 
los que el 48,9 por 100 fueron 


exportaciones. Toda esta 
produccion incluye robots 
industriales con la posibilidad 
de ser autoadaptables, robots 
para soldaduras, para pintura y 
para medicion y control, todos 
ellos programables a traves de 
ordenador. 

Otra de las novedades, 
relacionada con la informatica, 
fue la presentation de un 
proyecto del estado italiano para 
impulsar el sector aeroespacial y 
de las comunicaciones, que ellos 
consideran como la mayor 
contribution italiana a la 
Agencia Espacial Europea. Se 
trata del programa Italsat, que 
se inscribe dentro del Plan 
Espacial Nacional de Roma, 
que data de 1979. Su objetivo 
es la realizacion experimental y 
pre-operativa de una red domestica 
de telecomunicaciones via satelite, 
en la que los ordenadores tienen 
un destacado papel. 


derechos, en exciusiva, para la 
creacion de juegos basados en 
una de las peilculas americanas 
de mayor impacto mundial en la 
actualidad: Platoon. 

Esta pelfcula, cuyo argumento 
se desarrolla en la guerra de 
Vietnam, es claramente una obra 
con fines pacifistas y, al contrario 
de lo que suele suceder en la 
mayorfa de los juegos o en otros 
filmes de este tipo, los 
protagonistas no son perfectos 
heroes estereotipados, sino que 
se les considera desde un punto 
de vista mucho mas humano. 

Este complicado argumento va 
a hacer que Ocean se tenga que 
enfrentar a un trabajo diflcil a la 
hora de crear un producto que 
resulte interesante, pues la 
verdad es que la historia no se 
presta excesivamente a juegos de 
este tipo. 

Sin embargo, los responsables 
de la compafifa estan dispuestos 


a poner toda la carne en el 
asador y, en vista de los nefastos 
resultados obtenidos con 
programas como Highlanders o 
Miami Vice, en los que utilizaron 
a programadores independientes, 
se ha tornado la sabia decision 
de encargar el trabajo a los 
propios programadores internos. 

De cualquier forma, aun 
tendremos que esperar algun 
tiempo para ver cuales son los 
resultados. 


NUiVO JUiGO 

BL 9NTMGA 

US Gold pronto sacara al 
mercado un juego de intriga 
llamado Where in the world is 
Carmen Sandiego? (jEn que 
rincon del munclo se encuentra 
Carmen Sandiego?) Este 


Acuerdo entre 
Lotus e IBM 

Lotus Development, uno de 
los mas importantes fabricantes 
de software de aplicacion, ha 
anunciado, de una manera casi 
simultanea a la aparicion de los 
nuevos modelos de IBM, los 
Personal Systems 2, que ya 
estan disponibles versiones para 
dichos ordenadores de sus 
programas Lotus 1-2-3, 
Synphony y Free Lance. Segun 
Chip Electrdnica, distribuidora 
olicial de Lotus en Espana, las 
nuevas versiones saldran a la 
venta en nuestro pals 
inmediatamente, pero advierte 
que seran versiones inglesas, a 
diferencia de los productos que 
ya existen para los antiguos 
sistemas de IBM, hace algun 
tiempo traducidos al Castellano. 

Ademas, Lotus ha hecho 
publico aliora que ha estado 
trabajando con IBM en el 
desarrollo del software necesario 
para que los nuevos ordenadores 
estuvieran arropados, desde su 
nacimiento, por los extendidos 
programas estandar. 

Por otro lado, tanto Lotus como 
Chip Electronica han anunciado 
que se esta creando un programa 
de intercambio de versiones, de 
manera cjue los antiguos sistemas 
compatibles estandar puedan 
funcionar sin problemas en los 
nuevos equipos de IBM 


programa, de nombre tan 
particular, nos invita a 
embarcarnos en una afanosa 
busqueda alrededor del mundo 
en pos de una de las llderes de 
una banda internacional Lo que 
hace que el juego resulte 
interesante es que se hace 
acompanar de un libro, 1987 
World Almanac Handbook of 
Facts, cuyo argumento resulta 
esencial a la hora de resolver el 
juego, aparte de que contiene 
informacion sobre practicamente 
todos los aspectos de la 
economla, demograft'a y 
socioiogfa norteamericanas 


































MEMORY 


Por: Javier Elices 

Para muchos, la principal diferencia entre el CPC 464 
y el CPC 6128 es que este ultimo posee una unidad de 
disco en lugar del cassette. Sin embargo, existe una 
diferencia mas que parece haber sido olvidada: 
el CPC 6128 posee 128 K de memoria RAM, 
de los que 64 K se desaprovechan casi por 
completo. El siguiente programa permite 
utilizar la memoria alternativa del 
CPC 6128, o la de los modelos 
anteriores con la ampliacion de memoria 
de Dk’Tronics. 



A 


pesar de las enormes ventajas de que 
podrfa gozar el CPC 6128 por su memoria extra, 
en la practica esta no se utiliza mas que en el 
CP/M PLUS y en algunos programas de 
utilidades. El presente programa permite, 
mediante la creacion de tres comandos RSX 
utilizar, la memoria alternativa desde el Basic, o 
incluso desde Codigo Maquina, en este caso con 
llamadas directas a las rutinas que manejan la 
memoria, 

Basicamente estos tres nuevos comandos 
utilizan la memoria alternativa en un solo 
bloque, y permiten salvar toda la memoria 
normal a la alternativa, cargar toda la memoria 
normal de la alternativa o intercambiar ambas 
memorias. 

Para tener estos comandos RSX en memoria 
solo es preciso ejecutar un corto bloque binario 
con autoejecucion, que se encargara de 
reinicializar el ordenador con los comandos 
«escondidos» en una porcion de memoria 
inaccesible para el sistema, y que como el disco, 


unicamente nos quitara algo de memoria, pero 



sin ocasionar ningiin problema con los programas 
que utilicemos. De esta manera, podremos estar 
tranquilos de que no «machacaremos», por 
accidente, las rutinas que manejan la memoria al 
cargar algun programa en Codigo Maquina en 
direcciones altas de memoria, 

Este bloque binario es generado por el 
programa I, llamado Memory.Bin. Para tener 
los comandos RSX en memoria solo hay que 
hacer RUN”MEMORY, o bien RUN” si se 
dispone de cassette, Es muy importante hacerlo 
antes de cargar otra cosa en memoria, porque al 
instalar los comandos se hace una inicializacion 
completa del ordenador, por lo que cualquier 
cosa que tuvieramos, a no ser en la memoria 
alternativa, la perderfamos. 

El que quiera teclear los programas en 
ensamblador y disponga del ensamblador del 
paquete Devpac de Hi soft debera teclear el 
programa II, ensamblarlo con la opcion 20 y 
salvar el codigo objeto, A continuacion teclear el 
programa III y ensamblarlo con la opcion 4. Una 
vez ensamblado, y con el en memoria (cuidado 
con el lugar de memoria donde coloquemos el 
ensamblador) salir al Basic y teclear de forma 
directa: 

LOAD'‘BANK.BIN”,&5040 
(suponiendo que el codigo objeto generado al 
ensamblar el programa II se haya llamado 

bank.bin. 

SAVE'‘MEMORY. BIN”,b,&5000,&280,&5000 











(suponiendo que quiera Ilamar al bloque 
binario que instala los comandos RSX, 

memory.bin). 

Estos son los comandos RSX que se emplean 
para el manejo de la memoria alternativa: 

lA4save: permite salvar toda la memoria 
normal a la alternativa. Tambien se conserva la 
pantalla, el modo, las tintas, etc. La ventaja 
consiste en que al reimcializar el ordenador, la 
memoria alternativa no se pierde y puede ser 
recuperada con el comando Mload. 

I A/load: permite cargar toda la memoria 
normal de la alternativa, quedando el ordenador 
exactamente igual a como estaba en el momento 
de salvar toda la memoria. 

lAfexch: intercambia ambas memorias, normal 
y alternativa. Al utilizarse se carga la memoria 
alternativa en la normal, y al misrno tiempo se 
salva la memoria normal en la alternativa. Su 
ejecucion es algo mas lenta que la de los 
comandos anteriores debido a que ambas 
memorias tienen que ser intercambiadas byte a 
byte. 

Para los afortunados poseedores de una 
ampliacion de memoria de Dk Tronics ademas de 
un CPC 6128, o bien para los que posean un 



UTILICADES 


CPC 464 o un CPC 664 y la ampliacion de 
memoria de 256 K, los comandos permiten la 
utilizacion de un parametro opcional. Este 
parametro es el numero de pagina de 64 K a la 
que se desea salvar, de la que se desea cargar, o 
con la que se desea intercambiar. En el caso de 
que sea O, puede omitirse. De esta forma los 
comandos quedan como: 

\MSA VE, n 
I MLOAD,n 
\MEXCH, n 

siendo n el numero de pagina de 64 K. Este n 
puede valer hasta 4, en el caso de un CPC 6128 
y una ampliacion de memoria de 256 K (320 K 
en total). 



Los comandos Msave y Mload fueron pensados 
sobre todo como ayuda a los sufridos 
programadores de Codigo Maquina, que con 
gran facilidad —habla la voz de la experiencia— 
pierden toda la memoria en un «cuelgue» 
irrecuperable. En condiciones normales se 
almacena en disco o en cinta todo lo que se 
quiere volver a recuperar y se prueba el 
programa o rutina en Codigo Maquina. En caso 
de que algo falle hay que reinicializar el 
ordenador, recuperar todo otra vez y analizar las 
causas del fallo. Con la utilizacion conjunta de 
estos dos comandos podemos salvar toda la 
memoria (MSA VE) en la alternativa justo antes 
de hacer la prueba. En caso de que el ordenador 
se «cuelgue», o de que no estemos seguros de que 
la rutina no haya llenado de «basura» la 
memoria, podemos reinicializar el ordenador 
(pulsando simultaneamente Ctrl, Shift y Esc) y 
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cargar de nuevo toda la memoria (MLOAD) con 
solo ejecutar el bloque binario que instala los 
comandos RSX en la memoria con 
RUN”MEMORY (o como lo hayamos llamado) 
y utilizar el comando MLOAD. Como el bloque 
binario es muy corto, en unos pocos segundos 
estaremos en las mismas condiciones que antes 
del accidente. 

Existe, sin embargo, un pequeno inconveniente 
que se puede paliar facilmente. Si el «cuelgue», 
por alguna razon, desactiva las interrupciones, no 
podremos reinicializar el ordenador pulsando las 
teclas Ctrl, Shift y Esc. La unica forma de 
reinicializacion es apagar y volver a encender el 
ordenador. Esto ultimo sf destruira todo lo que 
tengamos en la memoria alternativa: la memoria 
alternativa no se modiflca en una imcializacion, 
pero si al apagar el ordenador. La forma de 
evitarlo es instalando en el ordenador un boton 
de Reset, que se puede hacer muy facilmente. 
Para su instalacion basta con seguir las 
instrucciones del cuadro I. 

Cuando tengamos instalado el boton de Reset, 
podremos reinicializar el ordenador sin cortar la 
cornente y, por tanto, sin perder los contenidos 


CUADRO1 

Esquema para la elaboracion de un RESET 
Hay que colocar un pulsador que, al 
oprimirse, conecte la patilla RESET del 
Z80 a masa, o bien hacer el puente 
directamente. 

En el bus de expansion visto por detras: 


49 47 45 43 41 39 37 

n n n n n n n r 

UUUUUUU /! T 

50 48 46 44 42 40 38 

Este conector, junto con todas y cada una 
de sus propias conexiones, se encuentra 
descrito en el manual. 



10 iRuiina para reinicializar todo el sistma e mstalar HEHHW 


50 

QR6 

#5000 

40 



so buffer: 

EQU 

#5040 

60 INICIO: 

EQU 

#AA3C 

70 L0N6IT; 

EQU 

#Aco0-mino 

80 EJECUC: 

EQU 

INICIO 

SO 



100 SCOT: 

CALL 

#Ecce 

us 

LS 

HL,START 

120 

L0 

C,#FC 

134 

CALL 

8BD56 

140 START; 

LD 

HL,8UF C ER 

150 

10 

DE,INICIO 

160 

L0 

BC,L0NGIT 

170 

LOIR 


180 

CALL 

EJECUC 

W' 

LD 

DE.#0040 

200 

LD 

HL,INICI0-1 

m 

RST 

#18 

22" 

DEFQ 

DIR 

23-: dir: 

CEFle 

#C006 

240 RON; 

0EFE 

0 


de las direcciones de memoria alternativas. 

Existe ademas una pequenfsima posibilidad de 
que el «cuelgue» modifique las ocho primeras 
direcciones de la Ram y en este caso no se podria 
reinicializar ni siquiera con el boton de Reset, a 
no ser que la Rom inferior estuviera paginada, o 
que el boton de Reset paginara la Rom inferior 
tambien. Esto se puede hacer por hardware, pero 
su complicacion es bastante mayor que la 
instalacion de un boton de Reset, que es tan solo 
un pulsador que hace un puente entre la patilla 
Reset del Z80 y una de las conexiones a masa del 
bus de expansion. Su desarrollo queda fuera de 
los objetivos de este articulo. 


El comando Mexch fue pensado para poder 
tener dos programas simultaneamente en 
memoria, con su parte en Basic, rutinas en 
Codigo Maquina, ficheros de cinta o de disco 
abiertos, information en pantalla, variables, etc., 
y pasar de uno a otro en muy poco tiempo (unos 
tres segundos). 

De esta forma, podemos estar procesando un 
texto sobre la lista de acreedores, y tener una 
base de datos con la lista de acreedores en la 
memoria alternativa. Para cualquier consult a solo 
tenemos que intercambiar las memorias, ver lo 
que nos interese y volver a intercambiarlas. 

La execution de estos tres comandos es tan 
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potente, que se puede emplear el comando Msave, 
por ejemplo, desde un programa Basic que se 
esta ejecutando, y al utilizar el comando Mload, 
la ejecucion continuara desde la instruccion 
siguiente al comando Msave que se empleo para 
salvar toda la memoria. 

Esto no esta solo limitado al Basic, sino que 
tambien es aplicable al Codigo Maquina. 

Podemos llamar a la rutina que salva la memoria 
mediante Call, y despues recuperarlo todo 
tambien desde Codigo Maquina, a traves de 
Call, a la rutina que carga. Incluso se puede 
hacer de forma mixta entre Basic y Codigo 
Maquina: salvar el programa desde Codigo 
Maquina y cargarlo desde Basic o viceversa. 

Las direcciones de las tres rutinas, asi como las 
condiciones de entrada y de salida se pueden 
encontrar en la tabla II 


TABLA II 


Tabla de entradas 

directas desde codigo 

maquina. En todos 

los casos: 

condiciones de 

entrada: 

Acumulador. 

Numero de pagina de 

64K (0-4). 


condiciones de 

salida: 

AF, BC, DE y 

HL modificados.El resto 

de los registros se 

preservan. 

Direcciones de entrada: 

MSAVE: &0AA76 

(MS__E2) 

MLOAD: &AAE2 

(ML_E2) 

MEXCH: &0AB4F 

(ME_E2) 

Todas las direcciones son fijas. 


Como ejemplo cargue el bloque binario y 
escriba algo en la pantalla, introduzca algunas 
lineas de Basic o cargue un programa Basic 
corto. A continuacion ejecute I Msave. No se 
asuste si la pantalla se borra o se llena de «cosas 
raras», simplemente es debido a que la rutina 
que ejecuta el comando Msave utiliza la pantalla 
para agilizar el proceso. Ahora reimcialice el 
ordenador pulsando simultaneamente Ctrl, Shift 
y Esc. Vuelva a cargar el bloque binario y 
ejecute el comando I Mload. En un momento 
volvera a tener en memoria todo lo que tuviera 
antes. 

Introduzca ahora el siguiente programa: 

10 PRINT 1 *PROGRAMA 1 EN 

EJECUCION” 

20 PRINT* ‘PULSE ‘C’ PARA CAMBIAR 

DE PROGRAMA” 

30 IF INKEYS = “c” OR INKEYf = “C” 

THEN IMEXCH 

40 PRINT: GOTO 10 

Ejecute el comando I Msave y modillque la linea 
10 de manera que diga ‘‘PROGRAMA 2 EN 
EJECUCION”. Ejecutelo. Pulse ahora la tecla C 


UTILICADES 


y tendra en memoria el programa cuya linea 10 
dice ‘‘PROGRAMA 1 EN EJECUCION”. (Una 
vez mas se podra extranar de los efectos que 
produce en pantalla; no se preocupe, que 
tambien es normal.) Ejecute este programa 
tambien. Pulse C unas cuantas veces para 
cambiar de un programa a otro. Podra 
comprobar lo sencillo que es tener dos programas 
en memoria y lo sencillo que es el cambio de uno 
a otro. 

En la practica, lo que debe hacer para tener 
dos programas en memoria que se puedan llamar 
el uno al otro es lo siguiente: 

— Inicialice el ordenador, cargue el bloque 
binario (RUN“MEMORY) y ejecute \Msave 
(esto ultimo es muy importante, pues de lo 
contrario al ejecutar el comando Mexch o Mload y 
no haber nada en la memoria alternativa, el 
«cuelgue» estaria asegurado). 



— Cargue el primer programa y ejecutelo. El 
programa debera contener alguna opcion para 
ejecutar la orden Mexch, o bien forma de salir al 
Basic para hacer esto directamente. 

— Una vez hecho esto cargue el segundo 
programa y ejecutelo tambien (este segundo 
programa tambien debe tener alguna opcion para 
ejecutar el comando Mexch o forma de salir al 
Basic). Ahora puede Irabajar con el, y en cuanto desee 
pasar al otro programa utilice la opcion de Mexch o 
saiga al Basic y hagalo directamente. En unos 
tres segundos estara en condiciones de utilizar el 
otro programa tal y como lo dejo. 

Si desea evitar el que durante el cambio 
aparezcan «cosas extrahas» en pantalla —todo es 
acostumbrarse— puede poner todas las tintas a 
cero mediante la instruccion Ink n,0 dentro de un 
bucle y volverlas a poner a sus valores correctos 
despues del cambio. Esto debe hacerse en los dos 
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PROGRAMA § 

1 MEHORY &4FFF 

2 address=&5000 

3 C 0R i=i TO 48 

4 5um=0:REAO code!,check? 

5 F0» o=l TO 21 STEP 2 

b byie=VAL{*S*+RID$(code$ f f.2) 

POKE address,byte 
su6=suB+bvte: address=3ddress+l 
MEXT 

IF su»<'2AL f *&*+chec i :$) TL 'Eh FEIN 
'"Error en data en aa 
:: NEXT 

12 PRINT:PRINFFreparese ps'a «ti 

- h. -‘Jplz 3U _ 58 CU3*QU - ‘ l“Z r 

ir : le :wev$= w *:sem3 

es : sg&jX - 

MID CCC02C2<0B&6t)EF0C01683 S7 7 
. r i 1- j5v! 13^AA010001 bDBO.4CB 

- 5 DA T A CS3 Jflfill ; 2 r 3A2F-2i3F2 

130 "A“A 5005COWW . 


. data ocooocooodooooaooooooo.o 
150 DA T A 0000000000000000000133,3a 

lb? DATA AA21S4AAC3D1BC44AAC'. ■ ■ 
170 DATA AAC3D8AAC345AB40534159, 535 
ISO DATA C54D4C4F41C449455843CS. t A7 

130 0A T A ooooooocoooooooooeoooo.c 

DATA OCOOOOOOCOOOOOODOOOC 
2l( oooootiFEC set 

220 DATA 7E005-E04DO-3E07358AAC;,6S: 
230 DATA Ef ? CES08D? r FC3Z5ES ft **" TFD 
24? DATA ED 7 35AAAc 7 ?'DDDEnSD 
250 DATA COHO 40424BEDB DCCCD 7 
260 DA 7 A AB2i00401iOOCG444DED8 r : - 
270 DATf O®L c r3FC^&A9tiFF,5$0 
DATA 7F0!004iEDB8CiSC1CFODE,' 
DA T A SC8fi8AS21004011 14 ... 

DATA 4DE2SCCDCFABED7B58AA F E, 7 96 
3lC DATA C9FE002803FEC1C32D7E03,S22 
320 DATA FE04D0F38787C603D91»$}BS 
330 DATA E D050603D9874FE6034 77S 43A 
340 DATA E61CS7BOFSC401007PED73,£39 
350 DATA 7 C210040444DEDBoD93210 431 


365 DATA E2ED7B5AAACDCFAE2 0030,675 
370 DATA ;;004U24eEO'0"?03Ei:: .£56 
380 DATA CSF1DS08FDEI30E!FS-BCD 9tC 
330 tit; P'AEr";C"E??: ■ £011,644 
400 DATA ttOCW440EDBCC!JCFA9T8C9,5F9 
410 OATS FEW2$0SFEQtCW37E : : 5 
M DAN P4DOF3OffiSF5E5OB09f5C5 306 
42C DAN D5ESEED?ED735AlA6’" TD?, 6 
440 DA*A 1109MD9C6 42 •. 

data . zjm v - u. 
4-6$ DATA 1C : 7 E FI C4010 ' I 
470 DAN C5210040444DIAE:- 
. 

m DATA 626342481 8CDCFA37E0MD 4-v 

500 data r 57 -. 

I [I - - 37?Bi?|)£S5AlBO8F073SA St 7 
52 . data aac:cfabeid:cif:d5::fd,. 

533 DATA EWDElFBlBZJPSESOiOOTCEC 
540 DATA 3E2.CE37 c C1 c !C9 p 5254F£6. : . 
£50 DATA ‘34779E. CETBO^ECI 

data ?fed79c: c :c3: ’ 

;?0 DATA 2AC9S12E 3ZAC467 - SBC.4F 


programas: ambos deberan poner las tintas a cero 
antes del cambio y luego restablecerlas despues 
del cambio. Esto no fue ariadido directamente al 
programa para evitar que su longitud aumentara, 
ya que no es realmente indispensable. 

Por supuesto, se pueden utilizar programas 
comerciales siempre que permitan salir al Basic o 
se puedan modificar y no utilicen la memoria 
alternativa para algo. Por ejemplo el programa 
Tasword 128 utiliza la memoria alternativa para 
almacenar en ella el texto, por lo que destrozara 
el programa que alii tengamos. Tampoco 
podemos usar el CP/M PLUS. 

En el caso de que dispongamos de mas de 64 
K de memoria alternativa, podemos utilizar 
alguno de los bancos de 64 K superiores 
(distintos del 0), sin tener siquiera que 
preocuparnos de esto ultimo. 

Ni que decir tiene que todos aquellos que 
posean mas memoria tienen abierto una amplia 
gama de posibilidades. Estos pueden, por 
ejemplo, tener tres o mas programas que se 
llamen unos a otros el mismo programa salvado 
en diversas fases de ejecucion, etc. Incluso 
podrfan crear un macropro grama con el menu e 
instrucciones completas en un bloque, y las 
diversas opciones en varios bloques distintos; 
quiza algunas de ellas compartiendo el mismo 
bloque. En el caso de que quisieramos cargar 
todos los bloques seguidos, cosa que no se puede 
hacer desde el mismo programa, podrfamos 
programar una tecla con toda la lista de 
instrucciones necesarias para la carga, como por 
ejemplo: 

KEY0, “LOAD” + CHR$(34) + “BLOQUEl” 
+ CHR$ (13) + “IMSAVE” + CHRf (13) 

+ “LOAD” + CHR$ (34) + “BLOQUE2” + CHR$ 



(13) + “IMSAVE,1” + CHR$ (13) + “RUN” 

+ CHR$ (34) + “MENU” + CHRf (13) 

Bastara entonces con que pulsemos 0 en el 
keypad numerico para que se introduzca el 
programa Bloque 1 en el primer bloque, el 
Bloque2 en el segundo bloque, y se ejecute el 
programa Menu. Desde este, cuando llamemos a 
uno de los otros programas (intercambiando el 
bloque en el que se encuentre con el actual) nos 
dejara en el Basic con el programa al que hemos 
llamado en memoria y solo tendremos que pulsar 
Run la primera vez; a partir de entonces, cuando 
lo volvamos a llamar continuara su ejecucion a 
partir de la instruccion siguiente al Mexch, que 
debera ser Run o Goto al principio del 
programa. Este Mexch debe hacerse con el 
numero de bloque en el que este el mismo 
programa, para poder volver el menu. 

Un programa cargador de todos los demas 
podrfa ser: 

10 KEY 0, CHRf (31) + “LOAD” + CHR$ (34) 
+ “BLOQUEl” + CHRf (13) + “IMSAVE” 

+ CHRf (13) + “LOAD” + CHRf (34) 

+ “BLOQUE2” + CHR$ (13) + “IMSAVE,1” 

+ CHRf (13) + “RUN” + CHRf (34) + “MENU” 
+ CHRf (13) 

20 PRINT: PRINT 1 ‘CARGADOR DEL 
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PROGRAMA X” 

30 PRINT: PRINT“PULSE ’O’ EN EL 
KEYPARD NUMERICO” 

40 WHILE INKEYf < >CHR$ (31): WEND 
con la inclusion de un caracter inicial CHR| 
(31) en la instruccion Key, que sirve para 
asegurarnos de que se pulsara 0 en el keypad 
numerico y no cualquier otra tecla. 
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Podra comprobar como al pulsar 0 en el 
keypad numerico, tecla que es definida 
previamente mediante la instruccion Key 0,... se 
consigue ejecutar toda la lista de instrucciones 
que se han deflnido en esa tecla como si 
realmente se hubieran tecleado directamente. Solo 


hay que tener cuidado con las comillas, que 
deben introducirse separadas como CHR$ (34) 
como bien puede apreciarse en los dos ejemplos 
anteriores. 


1 ;Rutinas para salvar la ae*ona coapleta a uno de los cuatro 

2 Jbancos de 64K de la aipliacion de »e*oria de Dk'Ironies o a 

3 jla ieaoria alternativa del CPC 6128 

4 

5 ORG IAA30 j ENSAHBLAR CON 16C+4+11 

6 ENT % 

1 


8 IK1CI0: 

LD BC.TABIA 




9 

LD HL,BUFFER 




1C 

JP IBCD1 

iKL L06 EXT 


11 





12 TABLA: 

DEFY TOKENS 




13 

JP HSAVE 

63 

LD 

C,L 

14 

JP MLOAD 

64 

LDIR 


15 

JP HEXCH 

65 

LD 

8,3 

16 


66 

LD 

HL.43FFF 

17 TOKENS: 

DEFH 'HSAV' 

67 NS Bl: 

PUSH BC 

18 

DEFB *£'+#80 

68 

CALL SELECT 

19 

DEFH 'HL0A' 

69 

LD 

DE.I7FFF 

20 

DEFB ”D'*#80 

70 

LD 

BC,44000 

21 

DEFN "HEXC‘ 

71 

LDOR 


22 

DEFB 'H*+#80 

72 

POP 

BC 

23 

OEFB 0 

73 

INC 

A 

24 


74 

DJNZ NS Bl 

25 BUFFER: 

DEFS 4 

75 

SUB 

4 

26 STACKl: 

DEFW 0 

76 

CALL SELECT 

27 STACK2: 

DEFY 0 

77 

LD 

HL,14000 

23 INKS: 

OEFS 16 

78 

LD 

DE.IC000 

29 


79 

L0 

B,H 

30 hSftve: 

CP 0 

60 

L0 

C,L 

31 

JR Z f HS SI 

81 

LDIR 


32 

CP 1 

82 

CALL RESET 

33 

RET N2 

83 

L0 

SP.tSTACKl) 

34 

LD A.unoi 

84 

El 


35 NS E2: 

CP 5 

85 

RET 


36 

RET NC 

86 



37 NS si: 

Cl 

87 NLOAD: 

CP 

0 

38 

LD (STACKl!.SP 

88 

JR 

Z.NL.Sl 

39 

PUSH 11 

89 

CP 

1 

40 

PUSH IY 

so 

RET 

N2 

41 

EX AF.AF' 

91 

LD 

A,(IX+0) 

42 

EH 

92 KL £2: 

CP 

5 

43 

PUSH AF 

93 

RET 

NC 

44 

PUSH BC 

94 HL Si: 

DI 


45 

PUSH DE 

95 

ADC 

A,A 

46 

PUSH HL 

96 

ADD 

A,A 

47 

EX AF.AF- 

97 

ADD 

A,3 

48 

EXX 

98 

EXX 


49 

LD (STACK21.SP 

99 

LD 

DE,18000 

50 

ADO A,A 

100 

EXX 


51 

ADD A,A 

101 

L0 

8,3 

52 

CALL SELECT 

102 NT Bl: 

EXX 


53 

LD HL.IC000 

103 

LD 

H,A 

54 

LD DE, 44000 

104 

LD 

C.A 

55 

LD B.D 

105 

AND 

3 

56 

LD C,E 

106 

LD 

6,A 

57 

LDIR 

107 

LD 

A.C 

58 

INC A 

108 

AND 

28 

59 

CALL RESET 

109 

ADD 

A,A 

60 

LD HL,#4000 

110 

OR 

B 

61 

LD DE.IC000 

111 

OR 

196 

62 

LD B H 

112 

LD 

BC.I7F00 


PROGRAMA II 


113 

OUT 

(C),A 

172 

LD 

ISTACK21.SP 

114 

LD 

AH 

173 

ADD 

A,A 

115 

L0 

HL 44000 

174 

ADO 

A,A 

116 

LD 

B,H 

175 

EXX 

DE.ICOOO 

117 

LD 

C,L 

176 

LD 

118 

LOIR 


177 

EXX 


119 

EXX 


178 

LD 

B,4 

120 

DEC 

A 

179 HE.Bl: EXX 

HL,44000 

121 

DJNZ 

NL 6! 

180 

LD 

122 

LD 

SP.ISTACK2) 

IB! 

AND 

A 

123 

CALL 

RESET 

182 

SBC 

HL.DE 

124 

LD 

HL.tCOOO 

183 

JR 

Z.NE.S2 

125 

LD 

DE,14000 

184 

LD 

H,A 

126 

LD 

B,D 

185 

LD 

C.A 

127 

LD 

C,E 

186 

AND 

3 

128 

LDIR 

187 

LD 

8,A 

129 

EXX 


188 

LO 

A,C 

130 

EX 

AF.fiF' 

189 

AND 

28 

131 

POP 

HL 

190 

ADD 

A,A 

132 

POP 

DE 

191 

DR 

B 

133 

POP 

BC 

192 

SR 

196 

134 

POP 

AF 

193 

LD 

BC.47POO 

135 

EXX 


194 

OUT 

(0,6 

136 

EX 

AF,AF' 

195 

LD 

A,H 

137 

POP 

IY 

196 

EX 

AF.fiF 

138 

POP 

IX 

197 

LO 

HL,44000 

139 

PUSH AF 

198 

LD 

B,H 

140 

El 


199 

LD 

C,L 

141 

CALL OFFSET 

200 REj 

B2: LD 

A,IDE) 

142 

Cl 


201 

LDI 


143 

PDF 

AF 

202 

DEC 

HL 

144 

CALL 

. SELECT 

203 

LD 

(HLi.fi 

145 

LD 

HL,14000 

204 

INC 

HL 

146 

LD 

DE.4CQ00 

205 

JP 

P£,RE_B2 

147 

LD 

B,H 

206 NE 

S4: EXX 

AF.fiF' 

146 

LD 

C.L 

207 

EX 

149 

LDIR 

206 

INC 

A 

ISO 

CALI 

. RESET 

209 

DJNZ NE.B1 

151 

El 


210 

JR 

HE.S3 

162 

RET 


21! NE. 

S2: ID 

H,0 

153 



212 

LD 

L,E 

154 NEXCH: CP 

0 

213 

LD 

8,0 

155 

JR 

h HE SI 

214 

LD 

C,E 

156 

CP 

1 

215 

EX 

AF,AF' 

157 

RET 

NZ 

216 NE 

83: CALL RESET 

158 

L0 

A.CIX+O) 

217 

LD 

ft, (HL) 

159 NEj 

E2: CP 

5 

218 

EX 

AF.AF' 

160 

RET 

NC 

219 

CALL SELECT 

161 NE : 

Si: DI 


220 

EX 

fiF, AF' 

162 

PUSH IX 

221 

LD 

w.A 

163 

PUSH IY 

222 

LD 

A,(Hl) 

164 

EX 

Af,AF' 

223 

LD 

(HL),D 

165 

EXX 


224 

CALL RESET 

166 

PUSH AF 

225 

LD 

(HL),A 

167 

PUSH BC 

226 

INC 

HL 

168 

PUSH DE 

227 

DEC 

BC 

169 

PUSH HL 

228 

LD 

A.B 

170 

EX 

AF.fiF 

229 

OR 

C 

171 

EXX 


230 

JR 

NZ.NE 83 


231 

LD 

D,H 

232 

JR 

HE S4 

233 HE S3: 

LD 

SP,(STACK2! 

234 

CALL RESET 

235 

POP 

HL 

236 

POP 

DE 

237 

POP 

BC 

238 

POP 

AF 

239 

EXX 


240 

EX 

AF.fiF' 

241 

POP 

IV 

242 

POP 

IX 

243 

£1 


244 

JR 

OFFSET 

245 

246 RESET: 

PUSH AF 

247 

PUSH BC 

248 

LD 

6C.47F00 

249 

LD 

A, 192 

250 

OUT 

(Cl,A 

251 

POP 

BC 

252 

POP 

Af 

253 

RET 


254 

255 SELECT: 

PUSH AF 

256 

PUSH BC 

257 

LD 

C.A 

258 

AND 

3 

259 

LD 

B, A 

260 

LD 

A.C 

261 

AND 

28 

262 

ADD 

A. A 

263 

OR 

B 

264 

OR 

196 

265 

LD 

BC.I7FOO 

266 

OUT 

CO t A 

267 

POP 

BC 

268 

POP 

AF 

269 

RET 


270 

271 OFFSET: 

LD 

A,(#AC00) 

272 

CP 

#C9 

273 

LD 

HL,(#B1C9) 

274 

JR 

Z, OFF Si 

275 

LD 

HL. (#B7C4) 

276 QFF^Sl: 

JP 

IBC05 


277 

278 FIN: 


,SCP 'ET OFFSET 


■ 
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Con el fin de acelerar lo mas posible el correo, y podcr resolver o contestar a 
todas las dudas y sugerencias que llegan a nuestra redaccion, a partir de esta semana 
os rogamos, en beneficio de todos, consignar en el sobre, en lugar bien visible, una 
de las denominaciones siguientes: 

— Suscripciones AMSTEAD. Para todos aquelos casos relacionados con petition 
de cintas, numeros atrasados, formalizacion de suscripciones, devoluciones, etc... 

— Mercado Comun AMSTEAD. Compras, ventas, intercambios, clubs... 

— Serie Oro AMSTEAD. Para los programas quc nos envieis para su 
publication. 

— Sugerencias AMSTEAD. Para vuestras criticas, sugerencias o cualquier 
opinion que querais vertir sobre la revista. 
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1 »1 i. iene 

Cubilete 

Por: Jose Munoz Dorado 



La magia del Locomotive Basic nos traslada, 
flotando entre nubes de aroma a casino y Far 
West, a un magnifico juego de simulacion con 
dados. Esperamos que los arrojados jugadores no 
tengan que salir vestidos de la sala con el 
susodicho cubilete, aunque, ya se sabe, el 
hombre feliz no tenia camisa. 


T 

JL. anto si se sabe jugar al poker de dados 
como si no, el programa «Cubilete» es muy 
sencillo de manejar, siempre y cuando se sigan 
con detalle las instrucciones. La novedad que 
presenta, respecto a la version tfpica del juego, es 
la obligacion de cenirse a la norma de elegir 
negros, rojos, jotas, reyes y ases por orden de 
aparicion. Pueden perder hasta la camisa de uno 
a cuatro jugadores. 

El programa comienza con una presentation 
que dara paso al menu, el cual posee dos 
opciones que permiten acceder a las instrucciones 
o al juego. La pantalla del tablero consta de dos 
ventanas principales: en la primera se muestran 
los dados, y en la segunda, que viene a ser la 
ficha donde queda registrado el nombre del 
jugador, el indicativo del grupo en el que se esta 


y los dados seleccionados. La eleccion de dichos 
dados se realiza a traves de las teclas «1», «2», 

«3», «4», y «5», tanto del teclado alfanumerico 
como del numerico, y segun el orden de 
ubicacion de los dados. 

Cada jugador tiene que realizar tres tiradas por 
grupo con los cinco dados menos los retirados. 

En caso de haber eliminado los cinco dados antes 
de agotar las tiradas, la siguiente se realizara 
nuevamente con la totalidad de estos. En estas 
ocasiones se dice que el jugador ha «doblado». 

Al final de la partida aparecera un tablero con 
las puntuaciones correspondientes a cada jugador 
Aquf se reflejan los puntos por grupo, 
partida y juego. Asf que podemos 
encontrarnos con un ganador de partida y un 
lfder de juego. 


AMSTRAD Semanal 13 









130 rem nmmmm 

140 REM PRESENTACION 
150 REM 

160 GOSUB 1930 
170 REM nun 
180 REM MENU 

190 rem mm 

200 GGSUB 2150 

210 rem mtmmtmtmnnnm 
220 REM Oiaiensiones de satrices 
230 REM e initiation de variables 

240 rem ntmtmmnmtmnm 

250 DIM partial(4,6):DIM surea(4,21): 
DIM total(4,21):DIM partida(21> 

260 partida=i:r=0 

270 rem wuwjmmwumw 

280 REM Definition de caracteres 

290 rem nnmnmnmnmmt 

300 SYMBOL AFTER 197 

310 SYMBOL 197,2,6,30,62,126,254,254 

,252 

320 SYMBOL 198,64,96,120,124,126,127 
,127,63 

330 SYMBOL 199,240,195,15,31,63,31,7 
,3 

340 SYMBOL 200,15,131,224,248,252,24 
8,224,192 

350 SYMBOL 201,3,7,31,63,31,15,195,2 

40 

360 SYMBOL 202,192,224,248,252,248,2 
24,131,15 

370 SYMBOL 203,252,254,254.126,62,30 

, 6,2 

380 SYMBOL 204,63,127,127,126,124,12 
0,96,64 

390 SYMBOL 205,0,63,127,103,103,127, 

127.102 

400 SYMBOL 206,0,252,254,230,230,254 
,254,102 

410 SYMBOL 207,102,127,127,103,103,1 
27,63,0 

420 SYMBOL 208 102,254 254,230,230,2 
54,252,0 

430 SYMBOL 209,0,63,127,103,103,126, 

126.103 

440 SYMBOL 210,0,252,254,230,230,126 
,126,230 

450 SYMBOL 21!,103,126,126,103,103,1 
27.63,0 

460 SYMBOL 212,230,126.126 230,230,2 
54,252,0 

470 SYMBOL 213,0,63,127,120,120,127, 
127,127 

480 SYMBOL 214,0,252,254,30,30,158,1 
58,158 

490 SYMBOL 215,121,121 121,120 124,1 

27,63,0 

500 SYMBOL 216,158,158,158,30,62,254 
,252,0 

510 SYMBOL 217,0,63,127,124,120,113, 
115,115 

520 SYMBOL 218,0,252,254,62,30 142,2 
06,206 

530 SYMBOL 219,114,115,113,120,124,1 
27,63,0 

540 SYMBOL 220,206,78,142,30,46.254, 
252,0 

550 SYMBOL 221,0,63,127,115,115,114, 

112,112 

560 SYMBOL 222,0,252,254,158,30,62,1 


26,254 

570 SYMBOL 223,112,112,114,115,115,1 
27,63,0 

580 SYMBOL 224,254,126,62,30,158,254 
,252,0 

590 SYMBOL 225,0,63,127,127,124,120, 

112,112 

600 SYMBOL 226,0,252,254,254,62,30,1 
4,14 

610 SYMBOL 227,112,112,120,124,127,1 
27,63,0 

620 SYMBOL 228,14,14,30,62,254,254,2 
52,0 

630 rem mmmnmtm 

640 REM Numero y noibre 
650 REM de los jugadores 

670 MODE 1:BORDER 13:INK 0,0:INK 1,1 
8:INK 2,14:INK 3,6 

680 PEN I:LOCATE 6,6:F'RINT'NUMER0 DE 
JUGADORES? (1 a 4>":at=INKEY$:IF a 
$=*" THEN 680 
690 lI=VAL(at) 

700 IF IK! OR 11)4 THEN 680 
710 LOCATE 12,8:PEN 3:PRINT 11:SOUND 
2,30,15,7 

720 LOCATE 6,ll:PEN 1:PRINT 'NOMBRE 
DE LOS JUGADORES:" 

730 FOR t=l TO II 

740 LOCATE 12,(2*t)+12:PEN 3:PRINT t 
”-";:FEN 2:INPUT” *,jug$Ct) 

750 IF LEN(jugt(t))>5 THEN LOCATE 12 
,2tt+12:PRINT"t MAXIMO 5 LETRAS t" 
:SOUND 2,500,100,15,0,0,i:F0R ton=l 
TO 1000:NEXT:LOCATE I2,2*i+!2:P.RIN T 
STRING$(22," "):GOTO 740 
760 NEXT t 
770 REM mtUt 
780 REM JUEGO 
730 REM mutt 

800 IF partida-21 T HEN ENDiCLS 

bio rem nnmm 

820 REM Ventanas 

830 rem nmnm 

840 MODE 1:PEN 1:BORDER 0:INK 0,6:IN 
K 1,26:INK 2,1:INK 3,24 

860 WINDOW*!,2,33,2,24:PAPER#1,0:CIS 
#1 

860 UIND0M2,35,40,1,25: PAPERI2,2: CL 
S#2 

870 U1NDQW#3,1,34,1,25:PAPERtl,0:CIS 

#3 

880 UIN00WS4,35,40,2,2:PAPERI4,I 
890 PEN 3:LOCATE l.UPSINT CHR$C 150) 
iSTRING$(32,154)iCHR$(i56) 

900 LOCATE 1,25:PRINT CHR*(147);STRI 
NG*(32,154);CHR$(1S3) 

310 FOR d=5 TO 24:LOCATE l,d:PRINT C 
HRii!49):LOCATE 34,d:PRINT CHRt(!49) 
: NEXT 

920 rem mmm 

930 REM Partida 

940 rem mmm 

950 LOCATE lO.lKPEN UPRINKP A R T 
I 0 ALLOCATE 10,13:PRINT"N U M E R 
O'jpartida!LOCATE 10,12:PEN 2:PRINT 
STRING*!13,154) 

960 FOR c=2 TO 24:L0CATE*2,2,c:PENI2 
,1:PRINT#2.par tida:NEXT 
970 FOR ton=l TO 3000:NEXT 


980 rem mmm 

990 REM Tiradas 

iooo rem mmm 

1010 FOR r=l TO 6:REM tContador de g 
rupos de tiradas*' 

1020 CLS#2:CLS#1 

1030 cubo*=CHR*(201+r*4)+CHR*(201+r* 

4+1)+CHR*(8)+CHR*C8)+CHR*(10)+CHR$X2 

01+r*4+2)+CHR*(201+r*4+31 

1040 LOCATE#!,15,1 :PEN#!,3:PRINTfl 

tubo$ 

1050 FOR ton=l TO 2000:NEXT 

1060 FOR t=l TO 11:REM t ont dor de 

jugadores* 

1070 e=5:g=0:k=0 

1080 CLS#1:CLS#2:CLS#4 

1090 jug*(t)=UPPER*(iug*(tl):PEN#4,0 

:PRINTI4,jugt(t) 

1100 L0CATEI2,l,4:PENI2,3:PRINTi2,tu 
bo$ 

1110 FOR a=l TO 3:REM tContador de t 
iradas’por grupoi 
1120 CLS#1 

1130 PEN 1:LOCATE 12,22:PRINT'TIRADA 
No."jalFOR ton=l TO 1000:NEXT 
1140 CLS#1 

1150 FOR b=l TO e:REN tContador de 1 
os dados en juegot 

1160 rem nnnhnnmnnn 

1170 REM Movisiento del dado 

1180 rem mmmmmmm 

1190 FOR n=2 TO 10 
1200 SOUND 1,3822,10,1,0,0,15 
1210 PEN 1:LOCATE b*7-4,n:PRINT CHR* 
(197)+CHR*(198) 

1220 PEN 1:LOCATE b*7-4,n+1:PRINT CH 

R$(139?+CHRti200i 

1230 LOCATE bt7-4,n:PRINT CHR*(201)+ 
CHR$C 202) 

1240 LOCATE bl7-4,#+l:PfiINT CHSK203 
)+CHR$(204) 

1250 LOCATE b*7-4,nlPRINT * " 

1260 LOCATE M7-4,n+i:PRINT " * 

1270 NEXT r, 

1280 I(b)=INT(RNDt6)+i:dado$(l(b))=C 
HR*(201+!1 £b)*4))+CHRt(201+(11D) 1 4) + 
l)+CHRt(8)+CHRt(8)+CPR*(10)+CHR$(201 
H I (b) *4) +2J+CHR* (20i+( i (b) *4 )+3) 
1290 SOUND 1,40.1,15,2,1:LOCATE <b*7 
)-4,11:PRINT dado*!Kb)) 

1300 NEXT b 

1310 rem mntttnuumn 

1320 REM Election de dados 

1330 rem nmmtnmmn 

1340 LOCATE 3,16:PEN 3:PRINT”1 
2. 3. 4 5," 

1350 LOCATE 11,22:PEN UPRINT'ELIGE 
TUS DADOS* 

1360 a*=INKEY* 

1370 IF a*="1" ANO !l!l)=r OR 1(1)=6 

) THEN b-l:GOSUB 1870 

1380 IF at=*2" ANO ClC2)=r OR 1(2)=6 

) THEN b=2:GOSUB 1870 

1390 IF a«=*3" ANO (l(3)=r OR K3)=6 

) THEN b=3:GOSUB 1870 

1400 IF ai=*4" ANO (l(4)=r OR 1(4)=6 

) THEN b=4:GOSUB 1870 

1410 IF a$=“5" AND !l(S)=r OR 1(57=6 

) THEN b=5:GOSUB 1870 

1420 IF 8=0 THEN e=5 
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U30 IF INKEY(47)=0 THEN 1450 
1440 GOTO 1360 
1450 NEXT a . 

1460 rem ttimmmmmtnmm 

t 

1470 REM Valor del grupo de tiradas 

1480 rem Mmmmmttmmmtt 
% 

1490 parcial(t,r)=rlg 
1500 su#a(t,partida)=parcial(t,l)+pa 
rcialC t,2)+parcial(t,3)+parcial(t,4) 
+parcial(t,5i+parnaUt,6) 

1510 IF k=g THEN parcial(t,r)=0 
1520 LOCATE 12,6:PRINT "TOTAL” 

1530 LOCATE 18,5:FEN 3:PRINT cubo* 
1540 LOCATE 2!,6:PEN 1:PRINT "=";par 
cial(t,r) 

1550 IF parcia!(t,r)=0 THEN SOUND 7, 
2000,20,15 ELSE SOUND 1,50,15,15 
1560 FOR cotpI TO 2000:NEXT 
1570 NEXT t 
1580 NEXT r 

1590 rem nnmtmnt 
1600 REM PUNTUACIONES 
1610 REM ««««««« 

1620 SPEED INK 15,50:INK 0,1:INK 1,2 
: INK 2,1,26: INK 3,24 
1630 MODE 1:FEN 3:LOCATE 3,2:PRINT” 
PUNTUACIONES* 

1640 LOCATE 5,3:F'R!NT STRING$U2,131 
) 

1650 PLOT 112,32,3:ORAWR 0,272:DRAWR 
496,OlDRAWR 0,-272:DRAWR -496,0:PL0 
T 500,304:DRAUR 0,-272 
1660 FOR 1=1 TO 11 

1670 PEN 3:LOCATE 2,4+Ct*4):PRINT ju 
gilt) 

1680 FOR r=l TD 6 

1690 LOCATE 10,5:PEN 3:F'RINT”N R J 
0 K A PART TOTAL” 

1700 PEN l:LOCATE 6+(r*3),4+(tl4):PR 
INT USING ;pareial(t,r) 

1710 NEXT r 

1720 LOCATE 28,4+(t*4):PRINT USING * 
4MK#”; suma C t, par t i da > 

1730 IF partida=! THEN total(t,parti 
da)=su»a(t,partida) 

1740 IF partidaOl THEN total(t,part 
ida)=total(t,partida-1)+su»a(t,parti 
da) 

1750 PEN 2:LOCATE 33,4+(i«S:PRINT U 
SING “####“j total(t,partida) 

1760 NEXT t 

1770 rem mmmmt* 

1780 REM OTRA JUGADA 7 
1790 REM mtMtttttttt 
1800 LOCATE 8,25:PEN 3:PRINT "OTRA F 
ARTIDA (S/N) 7 * 

1810 IF INKEY(60)=0 THEN LOCATE 29,2 
s:PEN 2:PRINT”Si":partida=partida+1: 
FOR con=l TO 500:NEXT:GOTO 800 
1820 IF INKEY> 48)=0 THEN LOCATE 29,2 
5:PEN 2:PRINT”No":F0R cor=l TO 500:N 
EXT:RUN 
1830 GOTO 1810 

1850 REM Rutina del dado selecciona 
do 

1870 e=e-l:g=g+l 

1880 IF Hb)=6 AND r<>6 THEN k=k+l 
1890 LOCATE -4+(b*7),ll:PRINT“ "JCH 


R*(8)+CHR*C8)+CHR*C10);* *:PENI2,1: 
PRINTI2,dado*(1(b)>ir:1(b)=0:RETURN 
1900 rem tnmttmm 
1910 REM Presentation 

1920 rem nnttnnntt 

1930 MODE l:INK 0,0:BORDER 0:INK 1,2 

6:INK 2,6;INK 3,24 

1940 LOCATE 12,2:PEN UPRINT CHRtdS 
6)+STRINGt(14,143)+CHR$U32):F0R d=3 
TO 16:LOCATE 12,d:PRINT STRING$(16, 
143):NEXT d:LOCATE 12,2:L0CATE 12,17 
:PRINT CHRt(130)+STRING$(14,143)+CHR 
4(129! 

1950 FOR f=250 TO 350 STEP 2 
1960 i =250+SQR (50*50- (f - 300) * (f -300) 

) 

1970 j=250-SQR(50*50-(f-300)*(f-300) 

) 

1980 MOVE f,i:DRAW f,j,2 
1990 NEXT f 

2000 LOCATE 11,20:PEN 2:PRINT "MU\0; 

PRODUCTIONS":LOCATE 14,22:PRINT** 
PRESENTA r 

2010 RESTORE 2060:FGR »=1 TO 34:READ 

o,p 

2020 SOUND 1,o,p*3,7;NEXT a 
2030 LOCATE 9,25:PEN 3:PRINT”C U B 
I L E T E" 

2040 FOR con=l TO 3000:NEXT con 
2050 FOR 5=1 TO 25:FOR u=0 TO 25:NEX 
T u:SOUND 1,27+s,2,15:CALL 58C4D:NEX 
T s 

2060 DATA 253,15,239,5,213,10,190,10 

,0,1,190,15,213,5 

2070 DATA 253,10,213,10,0,1,213,15,2 

39.5.284.10.213.10 

2080 DATA 190,10,213,10,0,1,213,20,2 

53.15.239.5.213.10 

2090 DATA 190,10,0,1,190,15,213,5,25 
3,10,213,10,0,1 

2100 DATA 213,15,239,5,284,10,239,15 

,253,30,0,60 

2110 RETURN^ 

2120 rem mm 

2130 REM Menu 
2140 REM tttttt 

2150 SPEED INK 15,15IM0DE 0:INK 0,1! 
:BORDER l:INK 1,0:INK 2,6:INK 4,24,1 
1:INK 3,0 

2160 LOCATE 3,4:PEN UPRINT'MENU:* 
2170 LOCATE 3,5:PRINT STRIN64(4,131) 
2180 LOCATE 3,9:PEN 2:F'RINT" 1-IN5TRU 
CCIONES" 

2190 LOCATE 5,10:PRINT STRING$(13,13 
1) 

2200 LOCATE 3,13:PEN 2:PRINT”2-JUEG0 
2210 LOCATE 5,14:PRINT STRING4(5,131 

) 

2220 LOCATE 3,2l:PEN 4:PRINT"0PCI0N 

? 7 " 

2230 LOCATE 3,22:FRINT STRING4(6,131 
) 

2240 FOR v=100 TO 200 STEP 5 
2250 SOUND 7,300-v,l,4:NEXT v 
2260 FOR x=100 TO 200 STEP 5 
2270 SOUND 7,x,l,4:NEXT x 
2280 a$=INKEY$:IF 8$="* THEN 2240 
2290 y=VAL(a4) 

2300 IF y<l OR y>2 THEN 2280 
2310 LOCATE 13,2l:PEN 3:PRINT ytSOUN 


Serie 

oid 


D 1,70,5,7 

2320 FDR con=l TO 1000:NEXT con 
2330 IF y=l THEN 2370 ELSE 210 
2340 rem mmmmm 

2350 REM Instrucciones 

2360 rem mmmmrn 

2370 MODE 1:INK 0,0:INK 1,2:INK 2,26 

:INK 3,6:BORDER 1 

2380 WINDOW#1,1,40,2,4:PAPER#1.1:CLS 
II 

2390 WIND0UI2,2,39,6,24:FAPERI2,2:CL 
SI2 

2400 PLOT 1,387,2:DRAWR 640,0:PLOT 1 
,333:DRAUR 640,0 

2410 PENH , 3: LOCATE# 1,8,2: F'RI NTH, * I 
« S T R U C C I C N E S" 

2420 PENI2,3:L0CATEI2,1,5:PRINTI2 * 
Esu es una version del ilasito 
juego de los dados de poker Pue- 
den jugar de una a tinco pers 
o- nas que aUernativasente elig 
Iran" 

2430 PRINTI2," sus dados correspond 
ienies a cada uno de los sets gr 
upos existentes troios, negres. 
jotas, gues, Las y ases)." 

2440 L0CATEI2,1,15:PSIST#dv UNA TE 

CLA":SOUND 2,30,5,7 
2450 CALl &BB18 
2460 CLSI2 

2470 LQCATE#2,1,5:T'SINT*2," Recue 
rda gue el t as t te serve de co 
aodtn para los grupos restart- tes 
, sieapre y cuando tengas co*o i 
ini no una ciuestra del grupo; eo" 
2480 LOCATE#?'1,9;PRiNT 12 " caso ft 
ntrario el valor del grupo sera 

0.” 

2490 LOCATE#^ U5:PRIN7I2 M T E 
CLA”:SOUND 2,30 5.7 
2500 CAlL 58818 
2510 CLSI2 

2520 LOCATE#'', 1,5:PRINT#2 " Pulsa 

la barra espadaddra des- pues 

de cada election. 

Se pueden reahiar hasta 20 par- 
tidas consetulivas " 


2530 LDCATEI2,1,15:PRINT#2," UNA T E 
CLA PARA JUGAR”:SOUND 2,30 35,7 
2540 CALL &BS18 
2550 GDTC 210 







Para que tus 
dedos no real ice n 
el trabajo duro, 
AMSTRAD 
Semanal lo hacc 
por ti. Todos los 
listados que 
incluyan estc 
logotipo sc 
cncucntran a tu 
disposicion cn un 
cassette mensual, 
solicftanoslo. 















Grafic Extension 

de Indescomp 

P.V.P.: 7.280 ptas. 

Para la realization de 
graficos ha sido creado 
Extension de graficos, que 
consta de un paquete de 
ampliation del Mallard 
Basic, para aprovechar al 
maximo las capacidades 
graficas del ordenador PCW 
8256 mediante la adicion de 
unos sencillos comandos de 
basic al programa. 

Los nuevos comandos nos 
permiten, entre otras cosas, 
la generacion de circulos y 
elipses, dibujos completos, 
relleno de zonas, redefinition 
de caracteres, creation de 
rectangulos, graficos de 
barras, etc. 

Los comandos de graficos 
se utilizan dando la 
correspondiente instruction y 
dando previamente un valor 
a las rutinas que vamos a 
emplear. A continuation 
analizaremos los comandos 
mas ampliamente utilizados. 

1. Comando PLOT: 

Este comando dibuja un 
punto en las coordenadas 
espetificas. Las variables de 
las mismas pueden ser 
cualesquiera, con la 
condition de que trabajemos 
con variables enteras y esten 
dentro de los rangos de la 
pantalla. 

2. Comando Circle 

La utilidad de este 
comando consiste en la 
posibilidad de dibujar una 
elipse inscrita en el 
rectangulo definido por sus 
cuatro parametros. 

3. Comando Linear 

El comando lmea permite 
dibujar lmeas entre dos 
coordenadas. 
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4. Comando Box 

Para poder dibujar un 
rectangulo podemos emplear 
esta opcion, en la cual solo se 
requiere introducir los datos 
de las coordenadas de una 
esquina del rectangulo y las 
de la esquina contraria. 

5. Comando Boxfill 

Este comando, al igual que 
el anterior, permite dibujar 
un rectangulo, pero en este 
caso lo rellena con una trama 
que puede definir el usuario. 

6. Comando Fill 

Cualquier zona cerrada 
determinada puede ser 
rellenada con la simple 
utilization de este comando, 
con solo definir las 
coordenadas del punto donde 
comienza el relleno. 


7. Comando Dibujar 

Esta es una de las opciones 
mas interesante con que 
cuenta el programa, puesto 
que nos permite dibujar una 
figura compleja mediante 
instrucciones simples que 
simulan movimiento de un 
punto. 

8. Comando Symbol 

Este comando permite 
definir sfmbolos especiales e 
imprimirlos en la pantalla en 
un lugar espetifico. 


Todas las representaciones 
graficas que representemos 
pueden ser grabadas 
mediante su correspondiente 
opcion («save»), para poderla 
reproducir posteriormente. 
Ademas de todas estas 
posibilidades, el programa 
cuenta con otra serie de 
opciones, como son: 

— Comando Ventana 
para definir la ventana 
grafica de trabajo. 

— Comando Symboldef: 
para redefinir un simbolo o 
caracter del ordenador. 

— Comando Border: 
pinta el borde de la ventana 
grafica definida en el 
momento actual. 

— Comando CLG: cierra 
la ventana grafica, sin afectar 
al resto de la pantalla. 

— Comando Mode: define 
el modo de impresion de los 
puntos en el dibujo. 

En el uso de rutinas 
graficas, pueden cometerse 
errores debidos a diversas 
causas, si bien las mas 
comunes a considerar son: 

1. No pasar variables 
enteras como argumentos de 
las llamadas. Esto haria que 
la rutina funcionara 
incorrectamente. 

2. Llamar a una rutina no 
definida previamente. 

3. Pasar a la rutina un 
numero inadecuado de 
parametros, o parametros 
fuera de los margenes 
maximos permitidos por el 
tamano de la pantalla. 

Por todo ello, es 
importante tener en cuenta 
estas observaciones a la hora 
de manejar el programa. 

Tomahawk 

de Microbyte 
P.V.P.: 4.928 ptas. 

Los simuladores de vuelo 
han alcanzado un nivel 
espectacular, y este es el caso 
de Tomahawk. 

El programa esta 
amenizado con pistas de 
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aterrizaje (helipuertos), 
edificios, arboles, torretas de 
tendido electrico y montanas, 
asi como carros de combate, 
artilleria y helicopteros 
enemigos. 

El relieve del suelo es 
visible a menos de 500 pies 
de altitud, lo que mejora la 
sensacion de velocidad. Con 
la practica se puede llegar a 
volar entre los arboles y las 
montanas, haciendo no solo 
el juego divertido, sino 
tambien emocionante. 

El interes del programa se 
centra en la gran variedad de 
opciones que presenta, las 
cuales pasamos a analizar: 

1, Misiones 

Mision 1 (vuelo de 
entrenamiento): 

Sirve para familiarizarse 
con el funcionamiento del 
helicoptero y para ejercitarse 
en las practicas de ataque. 
Las fuerzas enemigas no 
responderan al fuego. 

En total hay 1.024 
objetivos en el mapa, que se 
integran en sectores de ocho 
objetivos enemigos, que 
pueden ser piezas de 
artilleria o carros de 
combate. 

Mision 2 (combate): 

Es una breve mision en la 
que las fuerzas de tierra 
enemigas invaden cuatro 
sectores aliados. 

Nuestra mision consiste en 
liberar los cuatro sectores 
destruyendo los objetivos 
terrestres. 

Una vez destruidos todos 
los objetivos, la mision se 
completa tomando tierra en 
una pista. 

Mision 3 (combate): 

En esta ocasion estamos 
totalmente inmersos en 
territorio enemigo y tenemos 
que liberar el mapa 
completo. 


Cada sector enemigo se 
convierte en aliado en cuanto 
destruimos las instalaciones 
enemigas, y entonces ya 
podemos tomar tierra en la 
pista mas cercana y repostar 
carburante y municion. 

Mision 4 (combate): 

Es una batalla estrategica 
por la ocupacion del mapa 
entero. Tendremos que 
apoyar a las fuerzas de tierra 
aliadas en su lucha a lo largo 
de la linea de frente. 

Cada vez que liberemos un 
sector, la linea del frente se 
desplaza hacia la derecha, 
hasta que lleguemos a liberar 
una fila completa. 

Analogamente, si el 
enemigo consigue destruir 
nuestras fuerzas de tierra, el 
sector se convierte en 
territorio hostil y la lmea del 
frente se desplaza hacia la 
izquierda. 

Durante la batalla se debe 
evitar tomar tierra en 
territorio enemigo, aun 
cuando necesitemos repostar. 
Asi pues, antes de aterrizar 
debemos consultar el mapa 
para asegurarnos que 
estamos en territorio aliado. 

2. Dfa y noche: 

Durante el dia el horizonte 
es visible, pero durante la 
noche, al no haber horizonte, 
debemos utilizar la vision por 
infrarrojos intensificados por 
ordenador. 

3. Despejado o nuboso: 

La opcion de cielo cubierto 
se utiliza para vuelo 
instrumental. La altura de 
las nubes es seleccionable por 
el piloto. 

4. Altura de las nubes: 

Opcion seleccionable entre 
50 y 5.000 pies. 


5. Viento y turbulencia 

Esta opcion no debe 
emplearse antes de poseer un 
buen control del helicoptero. 
Los efectos son de intensidad 
variable, para que los pilotos 
mas expertos puedan 
disfrutar tratando de 
controlar el aparato. 

6. Nivel de experiencia del 
piloto 

Equivale al grado de 
dificultad. Vienen prefijados 
en cuatro niveles: aprendiz, 
comandante, instructor y as. 

Cada ascenso de categoria 
del piloto duplica la precision 
de los ataques enemigos. 

Una vez relatadas las 
opciones con que cuenta el 
simulador de vuelo, el interes 
se centra en la 
Instrumentation con que 
cuenta el helicoptero. Como 
veremos a continuacion, el 
aparato esta dotado de la 
mas alta tecnologfa. 

1. Tads 

Es un sistema de 
adquisicion y designacion de 
objetivos. Permite identificar 
y seguir carros de combate, 
piezas de artilleria y 
helicopteros, tanto propios 
como enemigos. 

Incluye un indicador de 
distancia que funciona 
cuando el objetivo esta a 
menos de 10.000 pies. 

2. VDU 

Es la unidad de control de 
vuelo. Proporciona los 
siguientes datos: 

— Velocidad en nudos. 

— Altitud en pies. 

— Velocidad vertical, en 
pies por segundo. 

— Tiempo que falta para 
llegar al objetivo. 

— Ordenador de 
navegacion: da la distancia al 
objetivo. 
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3. Horizonte artificial 

Muestra la inclinacion del 
helicoptero con respecto al 
suelo. De esta forma, si el 
helicoptero se inclina a la 
derecha, el horizonte artificial 
lo hace a la izquierda. 

4. Navegacion por Doppler, 
brujula 

Delimita el rumbo, ruta y 
demora. 

Todos estos instrumentos 
son de gran utilidad para 
conseguir destruir al 
enemigo, pero previamente 
debemos saber pilotar 
adecuadamente el 
helicoptero. 

El buen control de este se 
logra conociendo y 
practicando con el teclado los 
movimientos precisos para el 
despegue, reposicion de 
combustible, giros en vuelo, 
vuelo recto y nivelado, 
aterrizaje, etc. 

Solo de esta forma 
conseguiremos ser autenticos 
expertos aereos y poder 
combatir todos los obstaculos, 
tanto atmosfericos, como del 
enemigo, como los referentes 
al helicoptero. 

En cualquier momento, 
durante la utilization del 
simulador de vuelo, podemos 
acceder al mapa gracias al 
cual obtenemos information 
precisa de nuestra situation, 
la del enemigo, asi como de 
sus bases y de nuestros 
aliados. 

Cuando el helicoptero se 
encuentra en un helipuerto 
aliado, se le puede trasladar 
a otro sector activando el 
mapa y pulsando las teclas 
del cursor, para evitar la 
necesidad de realizar largos 
trayectos por los diversos 
sectores. 

El mapa es continuo en el 
sentido de que, por ejemplo, 
si el helicoptero se sale por 
arriba, reaparece por abajo. 

Todo lo relatado hasta 
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ahora puede hacer atractivo 
por si mismo al programa, 
pero el entretenimiento 
comienza cuando, una vez 
conocido el funcionamiento 
del helicoptero, nos ponemos 
en marcha para cumplir las 
misiones. Por ello, pasamos a 
referirnos al armamento y 
ataque de objetivos. 

En los modos de ataque a 
tierra y aire-aire estan 
activados los sistemas de 
armas. Con la tecla 
correspondiente 
seleccionamos el tipo de 
arma a utilizar 
(ametralladora, cohete o 
misil). 

El helicoptero tiene que 
estar en marcha para poder 
disparar. La ametralladora y 
los cohetes son de 
seguimiento manual; es 
decir, para que el Tads 
pueda funcionar, el objetivo 
tiene que estar dentro del 
visor en el momento del 
disparo. 

Los misiles persiguen a 
cualquier objetivo que pase 
por el visor; la persecution 
esta indicada por un cuadro 
bianco. El seguimiento es 
automatico mientras el 
objetivo este en la pantalla. 

El metodo mas sencillo 
para destruir al enemigo 
consiste en utilizar misiles 
guiados por laser, pero si lo 
hacemos con cohetes o 
ametralladora lograremos 
obtener mayor puntuacion. 

En todo momento debemos 
controlar que no 
sobrepasemos la velocidad 
maxima y el no forzar la 
potencia de los motores, pues 


en caso contrario comenzara 
a fallar la mecanica del 
helicoptero. 

La mision termina cuando 
hemos conseguido destruir 
todas las fuerzas de tierra 
enemigas y aterrizar en un 
helipuerto. Despues de 
aterrizar hay que cerrar el 
estrangulador para parar los 
motores. El ordenador de 
abordo emite entonces un 
informe sobre los resultados 
dc la mision. 



Necesifamos personas 
que conozcan 

profundamente el Amstrad 
PCW a nivel de Basic, 
Lenguoje Maquina y 
loroscript. Se valoraran 
conocimientos del CP/M. Si 
usted es una de estas 
personas, pongase en 
contacto con nosotros 
rapidamente en la 
direction que se indica a 
continuation, poniendo en 
un lugar muy visible del 
sobre: 

Referenda PCW 
AMSTRAD Semonal. 
Nuestra direccion es: 
AMSTRAD Semonal. 
Carretero de Inin, 
km 12,400, FuencarraJ, 
28049 Madrid. 
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El super libro 
de los juegos 
para ordenador 

Como Tim Hartnell dice en 
la introduccion, «el ordenador 
es un companero de juegos 
perfecto». Pero, cuando uno se 
empieza a familiarizar con la 
maquina y sus posibilidades, 
pueden aparecer las tentaciones 
de crear programas propios o 
hacer variaciones en otros para 
adaptarlos a nuestro gusto. 

En el libro que hoy nos 
ocupa, se pueden encontrar una 
gran cantidad de juegos, con 
representation de los tres 
grandes grupos (arcades, 
aventuras conversacionales y 
simuladores), todos ellos 
compatibles con Basic Microsoft 
y Basic MSX. 

Despues de la description de 
cada uno de los programas y 
sus listados, hay unos apendices 
en los que se explica, de una 
manera clara y sencilla, como 
adaptarlos a las peculiaridades 
de cada uno de los sistemas, ya 
sea Amstrad, Spectrum, 
Commodore o Apple, asf como 
las indicaciones generates para 
la conversion de los distintos 
sistemas. 

A cada uno de los juegos se 
le pueden realizar las 
modificaciones necesarias para 
cambiar la pantalla de 
presentation, anadir sonido o 
hacer que adquieran un aire 
mas personal, es decir, hacer 
que aparezcan todos esos 





detalles, que cada uno de 
nosotros consideramos 
importantes, en uno de estos 
programas. Por todo esto, la 
sencillez y poca brillantez de los 
juegos que nos propone, es lo 
menos importante. Lo mas 
interesante del libro es la 
posibilidad de ejercitarse en la 
programacion a traves de la 
diversion que proporcionan los 
juegos. 


para, ordenador 

64, Apple II 

Tim Hartnell 
Anaya Multimedia 

370 

2.226 ptas- 



Richard A.Watts 


Autor. 

Editorial- 

Paginal 

Precio: 



Computacion 

interactiva 

Computacion interactiva 
pertenece a la coleccion Guia 
Fdcil y, por tanto, esta 
destinada a «ayudar a los 
disenadores de sistemas alii 
donde hay ya ordenadores 
utilizados por personas 
inexpertas», como se dice en el 
prologo. 

La primera parte esta 
dedicada a la explicat ion de las 
caracterfsticas de estos usuarios, 
y el porque de su interes por 
ellos. Uno de los temas en los 
que mas enfasis pone el autor es 
en la necesidad de que el 
usuario intervenga en el proceso 
de diseno y la ayuda que 
pueden encontrar en las 


instalaciones de verification y 
asistencia. 

En la segunda parte se hace 
una introduccion al desarrollo y 
diseno de los sistemas 
interactivos. Los siguientes 
capitulos estan dedicados al 
analisis de uno de los apartados 
mas importantes, el dialogo, 
para terminar con una 
introduccion los lenguajes de 
ordenes, ayuda y soporte al 
usuario y consideraciones sobre 
el hardware. 

Lo mas destacable de este 
libro de la editorial Paraninfo es 
la claridad del lenguaje y los 
elementos graft cos, en realidad 
tablas, que ayudan a la 
comprension de un tema, en 
principio, acido para los 
principiantes, y en el que 
siempre es de agradecer la 
sencillez. 


li'tulo: 

Autor. 

Editorial; 

Eaginas. 

Precio: 


Computacion I nte . 


S «temar D ;,, aCtim 

Richard. A '° S ° S 


Paraninfo 

95 

A00 pta s 


Watts 
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Como crcar uegos do caracleres 
do cualquier tamano 

Pot Alberto Suner 



Cuando empezamos este cur so de Codigo Maquina, vimos una 
rutina que nos permitia imprimir cualquier mensaje en pantalla 
utihzando las rutinas del firmware. Hoy estudiaremos, 
precisamente, el mismo tema, pero esta vez nos olvidaremos 
completamente de las rutinas del sistema, creando de esta forma 
nuestras propias rutinas de impresion de textos en pantalla. 




























Codigo 

ara ello, lo primero que deberemos hacer 
sera crear nuestro propio juego de caracteres, es 
decir, crear los graficos correspondientes a cada 
letra y a cada numero o simbolo que deseemos 
imprimir. 


M4QUNA 



Otra solution mas sencilla que generar 
nuestros propios graficos, seria toraar la 
definicion de los caracteres que posee nuestro 
ordenador, y colocarlos en una posicion de 
memoria determinada. 

Ahora bien, lo verdaderamente interesante en 
el caso de utilizar una rutina de impresion 
independiente del sistema es que podemos 
generar definiciones de caracteres de cualquier 


hasta que encontramos el valor 255, que indicara 
el final del texto. 

As! pries, despues de cada cadena que 
deseemos imprimir, deberemos colocar el 
indicador de fin de texto para que nuestra rutina 
deje de imprimir. 

Esta rutina quedana de la siguiente forma 
escrita en lenguaje Ensamblador: 


dimension. 

En el momenta de crear nuestros graficos, 
deberemos tener en cuenta el modo de pantalla 
en el que se van a utilizar, ya que los graficos 
generados para un determinado modo no seran 
utilizables en ningun otro modo. 

Asi piles, si disenamos nuestro juego de 
caracteres para modo 1, estos no serviran ni para 
modo 0 ni para modo 2. 

En nuestro caso hemos preparado seis graficos 
correspondientes a los numeros del cero al cinco. 
Estos graficos estan preparados para ser 
imprimidos en modo 2, por lo que no seran 
validos para los demas modos. 

La causa de haber preparado unicamente estos 
graficos es por problemas de espacio, ya que para 
la definicion de cada caracter, son necesarios 
ocho bytes. 

Una vez hecho esto, lo primero que deberemos 
hacer sera confeccionar una rutina que nos 
permita imprimir en pantalla. En nuestro caso, 
tomaremos una rutina que ya ha sido explicada 
en un capitulo anterior de este mismo curso, por 
lo que no daremos mas detalles sobre la misma. 

Ya tenemos, piles, las dos condiciones basicas e 
imprescindibles para imprimir caracteres en 
pantalla sin la utilization de las rutinas del 
sistema, veamos pues como deberemos proceder 
para conseguir escribir textos en la pantalla de 
nuestro ordenador. 


CARAC: 


LD A,(HL) 

CP 255 
RET Z 
PUSH EIL 

CALL PRINT 

POP HL 
INC HL 

JR CARAC 


Tomamos el valor 
Comparamos con 255 
Retorna si es 255 
Preservamos el 
registro HL 
Llamamos a 
impresion 
Recuperamos HL 
Incrementamos el 
puntero 

Se repite el proceso 


Seguidamente nos encontramos con la rutina 
encargada de calcular los parametros iniciales 
necesarios con los que se debe llamar a la rutina 
de impresion en pantalla, es decir, la direction 
del grafico a imprimir y su position. 


Esta rutina permite crear caracteres de 
diferentes tamanos que daran una 
mejor presentation a nuestros 
programas 


Dado que nuestro texto lo introducimos 
mediante los codigos ASCII de los caracteres que 
deseamos imprimir, deberemos amoldar los 
valores de los caracteres a la forma en que los 
hayamos almacenado en memoria. 


Como la mayoria de las rutinas que hemos 
visto, esta necesitara tambien de unos parametros 
iniciales, y dado que se trata de una rutina de 
impresion de caracteres, estos datos iniciales 
deberan ser, como no, las coordenadas de 
pantalla y la direction del texto a imprimir. 

Estos parametros iniciales deberemos 
introducirlos en las variables o registros que 
indicamos a continuation: 

Posicion en pantalla ..... Variable Posic 

Direction del texto .Registro HL 

Una vez definidas estas condiciones iniciales, se 
entra en un bucle en el que se van leyendo los 
caracteres que componen el texto, y se envian a 
la rutina de impresion esta operation se repite 


En nuestro caso, dado que el primer caracter 
que hemos definido en memoria es el «0», cuyo 
codigo ASCII es el 48, lo primero que deberemos 
hacer sera restarle a cada codigo enviado el valor 
47, para que de esta forma el primer grafico 
definido (el 0) corresponda al codigo numero 1. 

En el caso de que desearamos definir las letras 
mayusculas, entonces deberfamos restar al codigo 
de cada caracter el valor 64, ya que el codigo 
ASCII de la letra A es el 65. 

Una vez acoplado el codigo de cada caracter, 
de forma que sea distinguible por nuestra rutina, 
deberemos comprobar que dicho valor no se 
encuentre fuera de los Unifies que nosotros hemos 
previsto. 
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As! pues, si nosotros hemos definido 
unicamente 10 caracteres, deberemos chequear 
que el codigo que se envie no sea mayor de 10 ni 
menor de 1 una vez modilicado, ya que de lo 
contrario no se encontrana en memoria. 

Esto lo podemos hacer de la forma que 
indicamos a continuacion: 

SUB 47 Se corrige el valor ASCII 

CP 0 

RET Z Se retorna si no esta dentro 
del limite establecido 

CP 7 

RET NC Se retorna si es mayor que el 
numero de caracteres definidos 

Una vez realizadas estas modificaciones y 
comprobaciones, pasaremos a calcular la 


direccion del grafico en memoria a partir del 
nuevo codigo calculado. 

As! pues, cargaremos el registro doble HL con 
la direccion donde empiezan los graficos menos 
ocho, ya que cada uno de los graficos ocupa ocho 
bytes. 

Por tanto, para calcular la direccion del grafico 
deseado deberemos sumar ocho bytes el numero 
de veces que indique el codigo del caracter. 

Para lo cual cargaremos el registro DE con 
dicho valor, y se lo sumaremos al registro HL el 
numero de veces que indique el valor 
correspondiente al caracter. 

Esto lo haremos mediante un bucle utilizando 
el registro B de la forma que se indica a 
continuacion: 

LD HL, NUMERS-8 
LD DE,8 


PROGRAMA ENSAMBLADOR 


1 

GRG 

IA000 

40 5 HL - 

POSICION 

79 

POP BC 




41 i DE - 

DIRECCION GRAFICO 

80 

DJNZ P BUC 

3 



42 ; 



81 

RET 

4 imCURSO DE 

CODIGO HAQUINA XXVttJ 

43 IHPRE: 

PUS! 

! DE 

82 


5 



44 

EX 

0E.HL 

83 


6 



45 

LD 

HL,#C000-80 

84 POSIC: 

DEFS 2 

7 

LD 

HL,#0505 

46 

L0 

B,Q 

85 TXT: 

DEFH *010203040512345'' 

8 

LD 

<PGSIC),HL 

47 

LO 

0,0 

86 

DEFB 255 

9 

LD 

HL,TXT 

48 

DEC 

E 

87 


10 CfiRftC: LD 

A,(HL) 

49 

ADD 

HL, DE 

88 


11 

CP 

255 

50 

LD 

0E,80 

83 ;DATOS 

PARA EL NUHER0 0 

12 

RET 

2 

51 S BUC: 

ADD 

HL,DE 

30 


13 

PUSH 

HL 

52 

DJNZ 

: S BUC 

91 NUHERS: 

DEFB 112.136,152.168. 

14 

CALL 

PRINT 

53 

POP 

IX 

200,136,112,0 

IS 

POP 

HL 

54 

L0 

B,8 

32 


18 

INC 

HL 

55 

JR 

COLOC 

93 5DATDS 

PARA EL NUHER0 1 

17 

JR 

CARAC 

56 P BUC: 

L0 

A, H 

94 


18 



57 

AND 

56 

95 

DEFB 32,96,160,32,32, 

19 



58 

CP 

56 

96 

32,248,0 

20 PRINT: SUB 

47 

53 

JR 

Z,P_PAS 


21 

CP 

0 

60 

LD 

a,h" 

97 IDATOS 

PARA EL NUHER0 2 

22 

RET 

z 

61 

ADD 

A,8 

98 


23 

CP 

7 

62 

LD 

H, A 

93 

DEFB 112,136,8,16,96, 

24 

RET 

NC 

63 

JR 

COLOC 

100 

128,248,0 

25 

LD 

HL.NUHERS-8 

64 P.PAS: 

LD 

DE, 0080 


26 

LD 

DE, 8 

65 

LD 

A,H 

101 ;DATOS 

PARA EL NUMERO 3 

27 

LD 

6,A 

66 

XOR 

56 

102 

DEFB 112,136,8,48,8, 

28 sue: 

ADD 

HL,0E 

67 

L0 

H, A 

103 

29 

30 

31 

DJNZ 

IK 

LD 

BUC 

OIsHL 

HL, (POSIC) 

68 

69 coloc: 

70 

ADD 

PUSH 

PUSH 

HL,DE 

BC 

HL 

104 

105 !DATOS 

136,112,0 

PARA EL NUHER0 4 

32 

33 

PUSH 

CALL 

HL 

IHPRE 

71 

72 P BUC1: 

LD 

LD 

B,1 

ft,<IX+0) 

106 

107 

DEFB 16,48,80,144,248, 

34 

POP 

HL 

73 

XOR 

(HL) 


16,16,0 

35 

INC 

L 

74 

LD 

(HL),A 

108 


36 

LD 

(POSIC),HL 

75 

INC 

IX 

109 !DATOS 

PARA EL NUHER0 5 

37 

RET 


76 

INC 

HL 

110 


38 



77 

DJNZ 

P BUC1 

111 

DEFB 248,128,224,16,8, 

39 



78 

POP 

HL 


16,224,0 
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BUC: 


LD B,A 
ADD HL,DE 
DJNZ BUC 

En este momento tenemos la direccion del 
grafico a imprimir en el registro HL, pero para 
llamar a nuestra rutina de impresion, dicha 
direccion debera estar contenida en el registro 
DE, para ello deberemos hacer: 

EX DE,HL 

Seguidamente deberemos cargar en el registro 
HL, las coordenadas de impresion en pantalla, 
para lo cual cargaremos dicho registro con el 
valor que indique la variable Posic. 

En este momento estamos en condiciones de 
llamar a nuestra propia rutina de impresion, que 
se encargarfa de imprimir el caracter deseado en 
pantalla, pero antes de hacerlo preservaremos el 
registro HL, conteniendo la posicion de 
impresion. 


PUSH HL 
CALL IMPRE 

Cuando se retorne de la rutina de impresion, 
recuperaremos el contenido de HL, e 
incrementaremos la coordenada horizontal para 
que el proximo caracter a imprimir se situe a 
continuacion de este. 

Una vez hecho, colocaremos este nuevo valor 
en la variable Posic, en la cual se almacenaran 
dichas coordenadas. 


POP HL 
INC L 

LD (POSIC),HL 
RET 

Debemos decir, por ultimo, que nuestra rutina 
de impresion esta preparada en este momento 
para imprimir caracteres de un byte de ancho por 
ocho de alto, pero se puede utilizar para 
cualquier otra dimension de grafico haciendo 
unas pequenas modificaciones. 


Codigo 


M/OJINA 



Si, por ejemplo, hubieramos definido caracteres 
de dos bytes de ancho por ocho de alto, 
deberiamos cargar en el registro HL la direccion 
de los graficos menos 16, que es la longitud de 
cada grafico; asimismo, cargarfamos DE con 
dicho valor. 

Tambien deberiamos tener en cuenta que 
ahora tendriamos que incrementar la coordenada 
horizontal en dos cada vez que se imprimiese un 
caracter. 

Por ultimo, deberiamos modificar los valores 
con los que se carga la altura y anchura de los 
graficos en la rutina de impresion propiamente 
dicha, y que ya se ha explicado en algun capitulo 
anterior. 


PROGRAMA CARGADOR 


10 REM 4CURS0 DE CODISO MAQUINA XIV 
% 

20 rem nttmnnmmmnnnn 
% 

30 REM 
40 REM 

SO FOR N=&AOOO TO SA0B5 
60 READ A:SUMA=SUHA+A 
70 POKE N,A 
80 NEXT 

90 IF SUKAO&46D9 THEN PRINT "ERROR 
EN OflTflS* 

100 DATA 33,5,5,34,115,160,33 
110 DATA 117,160,126,254,255,200,22 


9 


120 

DATA 

205,21,160,225,35,24,244 

130 

DATA 

214,47,254,0,200,254,7 

140 

DATA 

208,33,125,160,17,8,0 

150 

DATA 

71,25,16,253,235,42,115 

160 

DATA 

160,229,205,53,160,225,44 

170 

DATA 

34,115,160,201,213,235,33 

180 

DATA 

176,191,66,22,0,29,25 

190 

DATA 

17,80,0,25,16,253,221 

200 

DATA 

225,6,8,24,21,124,230 

210 

DATA 

56,254,56,40,6,124,198 

220 

DATA 

8,103,24,8,17,80,0 

230 

DATA 

124,238,56,103,25,197,229 


240 

DATA 

6,1,221,126,0,174,119 

250 

DATA 

221,35,35,16,246,225,193 

260 

DATA 

16,217,201,0,0,48,49 

270 

DATA 

48,50,48,51,48,52,48 

280 

DATA 

53,43,50,51,52,53,255 

290 

2 

DATA 

112,136,152,168,200,136,11 

300 

DATA 

0,32,96,160,32,32,32 

310 

DATA 

248,0,112,136,8,16,96 

320 

DATA 

128,248,0,112,136,8,48 

330 

DATA 

8,136,112,0,16,48,80 

340 

DATA 

144,248,16,16,0,248,128 

350 

DATA 

224,16,8,16,224,0,0 
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menores. 

Por supuesto, cuenta con 
NI Q y, por el momento, solo 
se sirve con juego de caracteres 
IBM y en particular para el 
Amstrad PC 1512. 

Complemento ideal de esta 
impresora de carro ancho es la 


IMOBiTB 


La otra dimension 


La merecida fama que han 
cultivado durante aiios las 
impresoras Admate por su buen 
precio y excelente fiabilidad, ha 
movido a su importador, DSE, 
a distribuir este modelo 
denominado DP 110, cuya 
principal caracteristica es la 
adopcion del carro ancho de 
quince pulgadas. 

La mayor parte de su 
circuiteria, asi como de su parte 
mecanica, estan tornados de los 
ultimos modelos de la marca, 
que funcionan a 140 caracteres 
por segundo, adaptados a las 
mayores dimensiones del carro 
que acepta hasta 132 caracteres 
por linea, frente a los 80 
caracteres de las hermanas 


base fabricada en metacrilato 
ahumado transparente, para la 
carga del papel que bajo la 
impresora podeis ver en la 
fotografia. 

Pero, si quereis fuertes 
emociones, las encontrareis en 
sus correspondientes precios: 
44.500 y 6.500 ptas., para la 
impresora y la base Flip’n’File 
respectivamente, a vuestra 
disposition en Ram-Rom, calle 
Infantas, 21. Madrid. Teh: (91 
522 79 78. 


A 


Modem economic© 

tr de un modem internol 

cn tarjeta para tu Ainsuaci 
I 1512 put dr suponcrte un 
shod y un reohazo total 
seguir 1 ndo por el t 
li>a elevados . r cjuadeMilPi 
dispt sitiv j 

Sin embargo el modem qn 
pn entamo en f i. i n r\H 
toda una exception y i que su 
atractivu especial es e. prt t in tl 
28.560 pesetas El sccreto <1 
este modem reside < n H 

totalmente fabricado y 
desarrollado en Espa". . \ 
eliminar todo tipo de lujos 
superfluos para, i so sf. cumplir 
los rnfnimo requisites que < xi 
la. Cl. 1ITT i trave.s de mis 
normas ma ■•xtendida,'- I . V i 
y V2.3. 

L.t tarjera modem ■■ instJtl.i 
u uno dr los tr< slots eon It 
cjui ucntii 1 Amstrad PC 
■ onei ta directamtijti • la Ifnca 
relefonit i i vitando t m h • 
problem,!', cans,-..los pot ri 

plamieia • >t •-1 k P.s capa? 

do transmitir v teribir fi, hems 

i -r, ’ 1 ,! ',l t 

baudios (unos 30 caracteres por 
segundo) dejando el modo V23 
de 1200/75 baudios para la 
comunicacion con los bancos de 
datos que cumplan la norma 
Prestel. 

Para la conmutacion de los 
modos de ; operacion, carece de 
automatismos hardware/software, 
pero se ha sustituido este 
sistema por otro mas simple de 
accionamiento manual, a traves 
de una pequeha caja con tres 
interruptores etiquetados 
convenientemente y unidos a la 
tarjeta por un cable-bus. 

El modem lo distribuye 
Sprind, calle Lopez de Hoyos, 

27. 28006 Madrid. Teh: (91) 

411 17 58. 
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El cuarto modo de pantalla 


Para todos los usuarios de los 
ordenadores Amstrad CPC que 
quieran sacarle mas partido a su 
pantalla de color, aqui teneis el 
sintonizador de television Proto. 

Colorado bajo el mismo 
monitor y enchufado a la red 
—cuenta ademas con una toma 
de corriente para conectar el 
ordenador al mismo 
sintonizador eliminando con ello 
el empleo de ladrones— permite 
convertir el monitor en una 
autentica television de color de 
14 pulgadas. 

Dispone de seis canales 
ajustables para sintonizar en las 
bandas 1 y III de VHF y UHF, 


e incorpora el mismo altavoz 
para obtener el sonido. 

En su panel posterior se 
encuentran los conectores de 
entrada RF (antena) y Video 
Compuesto por si se desea 
acoplar un aparato de video y 
visualizar la imagen, evitando 
las etapas de modulacion y 
demodulation por RF que 
afectan a la calidad. 

Su precio es de 19.500 ptas., 
y lo podeis encontrar en 
Comercial Nuevos Ministerios, 
en el vestibulo de la estacion 
Renfe de Raimundo Fernandez 
Villaverde de Madrid, Tel.: 
(91) 456 35 58. 
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Para ir tirando 

Si eres de los que tienes 
conectada una impresora a tu 
ordenador Amstrad, pero que 
no abusas de la literatura 
alfanumerica, casi seguro que te 
quedas pasmado cuando te 
enteres de lo que hay que pagar 
por las cajas de papel continuo 
en cantidades industriales. 

El papel Microdix que te 
ofrece Chips & Tips, Paseo de 
la Castellana, 126. 28046 
Madrid. Tel.: (91) 262 23 02 
esta hecho a tu medida, puesto 
que el paquete que te 
mostramos en la fotografia tan 
solo cuesta 1.400 ptas., y cuenta 
con 500 hojas, una cantidad de 
papel moderada para que 
puedas ir tirando si, por 
supuesto, eres de los que gastan 
poco. 



Bajo Have 

Otro objeto recomendable de 
Acco, distribuido por Master 
Computer, Plaza de Cristo Rey, 
3, esquina a Cea Bermudez, 
Madrid, es el archivador que 
podeis ver en la fotografia que 
puede llegar a albergar hasta 50 
discos de 5 1/4 pulgadas para tu 
Amstrad 1512. 

En su interior dispone de 
varios separadores para agrupar 
los discos por temas, etiquetas 
adhesivas de color para 
distinguirlos mejor, una hoja 
para incluir en ella el contenido 
del archivador, y, ademas, 
cierre con Have para evitar que 
el software «desaparezca» en 
extraiias circunstancias. Su 
precio es de 5.040 ptas. 
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El pasado 14 de julio, 
en los salones del Hotel 
Ritz, tuvo lugar la 
presentation del 
esperado PC 1640 ECD, 
un nuevo modelo de la 
saga PC de Amstrad 
que en el tema grafico 
va a tener mucho que 
decir. Este es nuestro 
presuroso primer 
contacto con este 
equipo. 


TEXT 

NUMEROUS PROPORTIONAU Y SPACED TO 
SCAPE 

FONTS ''AN . 

MOVED COPIE 

MERGED 

CHANGE 
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Presentacion en Espcina 
del nuevo tPC 1640 ECD 


T al y como se anuneio desde 
estas mismas paginas, hace ya 
algunas semanas, el PC 1640 
fue presentado en Estados 
Unidos en los primer os dias del 
caluroso mes de junio. 

Debido a las prisas que los 
dealers europeos, sin duda 
presionados tambien por los 
usuarios cada vez mas avidos de 
alcanzar el ultimo producto del 
mercado, Amstrad Consumer 
Electronic decidio la presentation 
de un nuevo equipo, y que ahora 
se pone a la cabeza de las 
configuraciones que conforman la 
saga PC comercializada por la 
empresa de Alan Sugar. La 
presentation del nuevo modelo se 
realizo el pasado 30 de junio, 
aproveehando el espeeialisimo 
mareo que siempre supone el PC 
USER SHOW. 

En Espana, foeo eada vez mas 
importante del eonsumo 
informatieo europeo, el 


advenimiento del nuevo modelo 
no se ha hetho esperar, y asf el 
pasado 14 de julio fue presentado 
en Madrid ante la expeetaeion de 
toda la prensa espeeializada. A 
pesar de su adelantada 
presentation, el PC 1640 no 
eomenzara a eomereializarse hasta 
el mes de septiembre, haeiendo 
eoineidir su puesta en la ealle eon 
la edition de Sonimag de este 
mismo ano. 

Realmente, denominar a este 
ordenador eomo PC 1640, no 
puede ser menos que injusto si 
hate pensar al usuario que la 
difereneia de este equipo ton el 
anterior, el 1512, se eneuentra 
exelusivamente en los 128 K que 
el nuevo modelo ineorpora, ya 
que esta diferenda es faeilmente 
igualable por menos de 10.000 
ptas., ampliando su memoria en 
los zoealos vaeios de la plaea 
eentral del 1512 (vease AMSTRAD 
Semanal n.° 78, pags. 46-50). 


La difereneia fundamental entre 
un equipo y otro se eneuentra en 
que el PC 1640 ECD, siglas que 
definen verdaderamente la 
filosoffa del nuevo equipo, y que 
no vienen a signifiear otra eosa 
que pantalla de eolor mejorada 
(Enhaneed Color Display), 
presenta una ealidad grafiea muy 
superior a la de su hermano 
menor, tanto en numero de 
eolores eomo en su resolution. 

Para eonseguir este aumento de 
ealidad, se han introdueido dos 
mejoras eonsiderables en el 
equipo. La primera de ellas se ha 
realizado sobre la unidad eentral y 
ha supuesto la ineorporaeion de 
las prestaeiones grafieas de una 
tarjeta EGA, pero eon la 
innovation, en el mas puro estilo 
Amstrad, de que esta se ha 
ineluido en la propia plaea del 
ordenador en una IGA 
(Adaptador interno de grafieos), 
mediante la eual se aleanza una 
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La capacidad grafica del nuevo PC 1640 ECD 
resulta impresionante. Con sus 64 colores y sus 350 
lineas, las imageries que pueden producirse son de 
un sorprendente realismo. 


resolucion de 350 lineas, frente a 
las 200 que era capaz de ofrecer el 
modelo anterior. Mediante esta 
inclusion en la placa, se ha 
conseguido que el numero slots 
libres, tres, no se vea afectado. 

Las posibilidades de ampliacion 
permanecen incolumnes. 

La opcion ECD debera ser 
estudiada por el usuario antes de 
su compra, ya que la ampliacion 
de 1512 a 1640 ECD conllevaria la 
compra de un nuevo monitor mas 
una tarjeta EGA, y le obligaria a 
tener permanente conectados dos 
monitores, dado que la fuente de 
alimentacion se encuentra en el 
monitor original Amstrad. 

Si el PC de IBM marca el 
estandar del mercado, en cuanto a 
ordenador se refiere, la tarjeta 
EGA es el adaptador que marca 
por excelencia la pauta de las 
compatibilidades graficas, seguida 
por la Hercules, destinada 
expresamente a los graficos 
monocromos. Esta estandarizacion 
grafica a color ha permitido que 
la mayoria de los programas 
corran, pese a la innovation del 
hardware, y que, ademas, 
aprovechen todas las nuevas 
posibilidades que le ofrece el 
adaptador EGA. 

En el caso de que el usuario 
precise, para programas de uso 
muy especial, un adaptador 
distinto o de mayor capacidad, la 
IGA puede ser inhibida cediendo 
todo el control grafico a la nueva 
opcion de color escogida. 

Las configuraciones previstas 
para el modelo 1640 ECD, son 


exactamente las mismas que las 
que en la actualidad se ofrecen 
para el 1512 con la salvedad de la 
opcion monocroma que carece de 
sentido en un ordenador con esta 
paleta de colores. 

La version disco duro presenta 
la novedad de disponer el 
controlador on-board, incluido en 
la placa central, lo que permite 
disponer de los tres slots libres, 
que presentan el resto de las 
configuraciones. 

El software suministrado con el 
equipo es exactamente el mismo 
que el que se incluia en el 1512: 

MS DOS 3,2 
Entorno Gem 

Gem Desktop Plus y Gem paint 
Disco de Gem 
Paint/Output 
Basic 2 de Locomotive 

Segun fuentes de la propia 
Indescomp, este software esta 
ligeramente modificado con 
respecto al ofrecido en el anterior 
modelo. Estas modificaciones 
tienen el unico objetivo de que el 
nuevo software aproveche al maximo 
los 64 colores y las 350 lineas de 
resolucion que ofrece la IGA. 

El precio, aunque por el momento 
no ha sido fijado, se baraja por 
fuentes solventes de la propia 
Indescomp, 100.000 ptas. por 
encima de una configuration similar 
del 1512, dadas sus especiales 
prestaciones y, segun las mismas 
fuentes, por debajo de la oferta 
actual PC + EGA + ECD que existe 
en el mercado. 

En Sonimage se dira... 


EGA: IA COMPATIBLE 
DEI COMPATIBLE 

La tarjeta EGA (Enhanced 
graphics adapter) surgio 
como producto de un 
esfuerzo por dotar al PC de 
una capacidad grafica 
superior al adaptador 
Hercules, unicamente 
valida para monitor 
monocromo, o a la CGA 
(coleur adapter graphics), 
con una resolucion y un 
numero de colores bastante 
limitado para aquellas 
aplicaciones en las que es 
necesaria una elevada 
calidad grafica. 

Tras la calidad de la CGA, 
adaptador de graficos con 
que cuenta actualmente el 
Amstrad PC 1512 y la 
practica totalidad de los 
compatibles con posibilidad 
de color, se encuentra, sin 
duda, la opcion EGA. 

Las posibilidades graficas 
de este adaptador, a parte 
de ser compatible con la 
CGA, la hercules o trabajar 
en modo monocromo de 
texto, soporta su conexion 
tanto a monitores RGB 
como a monocromos, 
aunque para obtener su 
maximo rendimiento se 
precisa la utilization de un 
ECD, monitor de color 
mejorado. Con esta tarjeta 
y este monitor, la 
resolucion de pantalia 
alcanza la cifra de 
640 x 350 Eineas, 
soportando una paleta de 
hasta 64 colores. 



Ur - kg ffaw I'a » 

C:\IVPESE1\SC00P.CHP (SCOOP.ST^ Set Prehatnces... 

1 Set Printer Info.. 


ir Edition 


Hide Side-Bar 
Show Rulers 
Show Column Guides 
Hide Pictis'es 
Hide labs 8 Returns A | 

Turn Colum Snap Off 
Turn Line Snap Off 



AMSTRAD Semanal 27 

















































SbOMO 


Es indudable que en mas de una 
ocasion hemos pensado, cuando 
estamos jugando con el ordenador, 
que la accion de la aventura en la 
que nos encontramos metidos se nos 
escapa de las manos. Esto, claro 
estd, produce una sensacion de 
impotencia y frustacion, por lo que 
dejamos de jugar hasta otro momento 
en el que el estado animico permita 
mayor concentracion, pensando: «Este 
juego es muy rapido, si fuera un 
poco mas lento...» 


MtCWO VOu * 


Slow 


Fail 


*““*n casi todas las facetas de la industria de 
nuestro dempo, siempre hay alguien que se 
preocupa de responder o encontrar solucion a los 
problernas que acucian al abnegado consultor. 

Este es un hecho sumamente afortunado, y el 
campo de la informatica, en este caso en su 
seccion de microordenadores, no iba a ser menos. 
Es por esto por lo que pensamos que, ante el 
sufrimiento de mas de una persona frente a un 
juego de los rapidos y dificiles de verdad, la 
firma britanica Nidd Valley se decidio a lanzar al 
mercado un controlador de VDU para la pantalla 
de nuestros Amstrad. Con el podremos regular la 
velocidad de desarrollo del juego, y adaptarla a 
nuestros reflejos. 

El controlador en si mismo no es mucho mas 
grande que una caja de cerillas. Los mandos de 
los que se compone este controlador son tres: 

— Regulador de velocidad. Es el tipico mando 
que al girar hacia la derecha o izquierda, permite 
aumentar o disminuir la velocidad del juego. El 


SlOVi 

motion 


N A<. 


mrnimo sera la detencion del juego, el maximo 
sera la velocidad propia de este. 

— Slow motion. Este mando pone en marcha 
el ralentizador a la velocidad elegida con el 
regulador. 

— Freeze Frame. O congelador. Parara la 
imagen sin necesidad de que este activado el 
ralentizador. En cuanto lo soltemos la accion 
seguira su curso. 

Estos son los pocos mandos necesarios para 
gobernar el ralentizador y poder jugar a nuestro 
aire. Eso si, deberemos tener en cuenta que 
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FICHA TECNICA 

Creador. Nidd Valley 

Distribuye: Micro 1. C/ Duque 

Ordenador: Gama CPC 

de sexto 50. 28009 Madrid. 

Precio: 995 ptas. 

Tel.: (91) 275 96 16 


tambien los enemigos juegan al mismo ritmo, y 
deberemos esquivarles, o dispararles, en cuanto 
les veamos aparecer. Hay una posibilidad, si se 
es un habil «manitas» o se cuenta con alguien a 
nuestro lado, y es la de detener o ralentizar el 
juego para estudiar la estrategia de ataque y, al 
volver a la velocidad normal, asestar certeros 
golpes al enemigo. Tampoco esta nada mal la 
posibilidad de poder hacer detenciones en los 
juegos que carecen de pausa, para poder 
descansar o, si nos viene bien, hacer cualquier 
otra cosa. 

Para conseguir realizar estas funciones, el 
ralentizador actua sobre la patilla de la NMI 
(Interrupcion No Mascarable), y al ordenador no 
le queda mas remedio que detenerse. La 
conexion del ralentizador se hace en el bus de 
expansion, y duplica la salida de este para poder 
conectar cualquier otro periferico. 

Logicamente hemos probado el ralentizador 
con los tres ordenadores, y en ningun caso ha 
aparecido ninguna anomalia en su 
funcionamiento. En el modelo CPC 464 lo hemos 
hecho estando conectada la unidad de disco, y 
tampoco ha habido ningun tipo de lallo. 

Una vez descrito el ralentizador, asi como su 
sistema de funcionamiento, es el momento de 
analizar el comportamiento de Slomo cuando ya 
tenemos un juego cargado Lo primero que se 
puede mencionar, es que con los juegos 
realizados con mterrupciones se producen fuertes 
«cuelgues» en el ordenador, ya que el 
ralentizador produce el corte de estas. 
Mencionada esta importante salvedad, es digno 
de ver como los llamados juegos de accion, 
trepidante en muchas ocasio nes, se convierten en 
pausados paseos al atardecer si es que nosotros 
queremos. Graduada la velocidad casi al mmimo, 


Mundo del 

CPC 

el juego llega a convertirse en algo relajante y 
adormecedor. Pero como los excesos tampoco son 
interesantes, y Slomo no nos va a obligar a 
cometerlos, siempre podremos escoger la 
velocidad que mas nos guste. 

No dudamos en afirmar que mas de una 
persona se llevara una alegrc sorpresa cuando, 
por fin, descubra que sus tensiones y berrinches 
frente a algun juego de los duros han 
temrminado. 

Slomo, el caracol, le conl'erira la tranquilidad 
necesaria. 
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JUEGOS 


SARACEN 
Lucha contra 
el inflel 


Creado por Data Soft 


Erbe 

Tel.: 314 18 04 

Cinta: 875 ptas. 

Disco: 2.250 ptas. 


Dv 


"urante las cruzadas, miles de cristianos 
llegaron a Tierra Santa dispuestos a «liberarla» de 
los infieles sarracenos que, por aquel entonces, 
eran los duenos de aquella parte del mundo. No 
fue una lucha rapida. A lo largo de varios siglos 
se sucedieron las escaramuzas y las grandes 
batallas Las ciudades y fortalezas pasaban de 
unas manos a otras tras sangrientas luchas. 

Tu mision es buscar al jefe de los sarracenos y 
destruirle. Para lograrlo hay que afrontar los 
peligros de las bombas y las balas del canon, que 
podras destruir, asi como a los soldados 
enemigos, con llechas que apunten en la 
direccion adecuada, pero manteniendo una 
prudente distancia, si no la detonacion de las 
bombas te alcanzara y moriras. La rinica forma 
real de acabar el juego y destruir al jefe 
Sarraceno es coger las granadas que se 
encuentran en nuestro camino. Cuando llegues a 
el, pon una a su lado y disparala con una flecha, 
si no el camino y los peligros habran sido en 
balde. 

Para recoger objetos hay que ponerse encima y 
pulsar el disparo, pero solo se puede Uevar un 



1 Hb 


solo objeto a la vez, de tal manera que si llevas 
un flecha o cualquier otro elemento belico, no 
podras coger las Haves y viceversa. 

En contra de lo que pudiera parecer por el 
tema, el desarrollo, tanto en graficos como en 
movimiento o color, es bastante mediocre, por no 
decir malo. 


Originalidad 

El El □ □ 

Graficos 

E) E) □ □ □ 

Movimiento 

El El El □ Q 

Sonido 

El El El Q □ 

Dificultad 

El El El □ □ 

Adiccion 

El El El □ □ 

Horrible 

//Un rollo Pasable 

V' /vVb. 

jeno / V V V Muy bueno 
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BOMB JACK II 

...O el tesoro desperdigado 


Creado por Elite 


Zafi Chip 

Tel.: 459 30 04 

Cinta: 1.200 ptas. 

Disco: 2.750 ptas. 


E^om Jack vuelve con esta aventura en la que 
tendra que recoger un tesoro desperdigado en 
una multitud de bolsas. Pero no sera tan facil 
como pudiera parecer. Tendra que enfrentarse a 
una multitud de reptiles, que van mutando con el 
tiempo, y a todos los peligros del espacio 
exterior. 


Lo que necesita es una buena dosis de agilidad 
V rapidez para recoger el tesoro a la vez que 
pelea con los enemigos y alcanza la cantidad 




necesaria de puntos para conseguir un Bonus 
Jack, es decir, una vida extra. Para pasar de una 
pantalla a otra sera imprescindible haber recogido 
antes todas las bolsas que aparecen en el 
monitor. 

Los graficos y el color son los normales en este 
tipo de juegos. Sin embargo tiene un movimiento 
rapido, que convierte al Bom Jack II en 
divertido. 


Originalidad 

El ED [T) □ □ 

Graficos 

El El El □ □ 

Movimiento 

ED El El El Q 

Sonido 

El El ED □ Q 

Dificultad 

El El El Q Q 

Adiccion 

ED El El Q El 

Horrible 

V Un rollo /WPasable 

V V Bueno V' V V V' V Muy bueno 
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JUEGOS 


BOULDER 

DASH II 

Rockford 
cava de nuevo 


Compulogical 

Tel.: 341 10 63 

Disco: 3.500 ptas. 



La segunda parte del Boulder Dash, tambien de 
First Star se vende en version inglesa, y con las 
complicadas mstrucciones tambien en ese idioma. 
Esto puede ser un inconveniente para algunos 
que se acerquen al juego que, por otra parte, 
tiene el mismo tratamiento que la primera parte. 

El objetivo de nuestro simpatico personaje es 
conseguir mas piedras preciosas y asf conseguir la 
riqueza que tan to desea. Vamos, que como 
cualquiera, si tuviera la oportunidad de encontrar 
una mina de diamantes, intentaria acaparar un 
numero ilimitado de piedras. No obstante, las 
profundidades de la tierra son un lugar peligroso, 
en el que el mas simple de los desprendimientos 
puede impedirle definitivamente volver a ver la 
luz del sol. 

Como en la primera parte, la pantalla muestra 
una seccion transversal del subsuelo, con todos 
los pasadizos que tenemos a nuestra disposition. 
En el camino encontramos unos grandes 
pedruscos que hay que empujar, con mucho 




ROCKFORD'S REVENGE 


IBM® PC/IBM® PCjr. V>' 


REOWRES GRAPHICS CARO 


esfuerzo, hacia los agujeros, sino no podremos 
pasar. Tambien es similar al anterior en los 
graficos y el movimiento, bastante acertado el 
ultimo y una realization muy esmerada de los 
primeros, aunque quiza sean demasiado sobrios 

Una de las diferencias entre las dos partes es 
que en esta segunda hay determinadas fases en 
las que el techo se derrumba. 

Se puede jugar con joystick o teclado, uno o 
dos jugadores en cualquiera de los cinco niveles 
de dificultad de que dispone. 


Originalidad 

ta ca □ 

Graficos 

a ta q] □ □ 

Movimiento 

ei ei ei ei □ 

Sonido 

ei ei ei □ □ 

Dificultad 

El El El El Q 

Adiccion 

El El El El □ 

Horrible 

Un rollo / V Pasable 

V . Bueno V" V V V Muy bueno 
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KRAKOUT 


Mas facil 
todav-n 

En Krakout se puede 
amoldar a nuestro gusto casi 
todo: velocidad de la bola, del 
bate, sitio por el que vamos a 
jugar, etc. Si a alguien le 
parece esto poco, esperemos que 
tenga bastante con este 
cargador. Fijaros que conceda: 

— Ntimero de vidas. De 1 a 


100 POKE 87044,fase-l 

110 LOCATE 5,13:PRINT "Vidas inf ini 

tas ? '!:GQSUB 170 

120 IF a$="S" THEN POKE &7026 i 0: p CK 

E 17027,0 

130 LOCATE 5,IBlPEINT "Continuar at 
la sisffia fa-58 ? "irfiCSUS 170 
140 IF a$="S H THEN PONE S7037,0;FOK 
E 87038,0 

150 LOCATE 3,23:PRINT "INSERTS CIV 
A ORIGINAL REB0B1NA0A.* 

160 CALL *7000 
170 af=*" 

180 CALL *3875:CALL *9381 

190 WHILE n$=*“: at s lfP p ER$(iNXEYi):V 

END 

200 PRINT a* 

210 CALL &B37F 


Vlctimas contra 
el cansancio 

Esto es lo que ofrecen los 
cargadores de cinta y disco para 
Dustin. Con ellos, la trabajosa 
tarea de fugarse de la carcel 
sera cosa de coser y cantar. La 
energia infinita hace milagros... 


l:LOCATE 5,12:PRINT "Quiets 
5 energia infinita ? ";:WHILE efi=" 
": ef(“UPPER*( INKEY*): WEND 
50 NODE 0:F0R ifO TO IS:INK n,0:NEX 
T 

60 L0AD"dust2",49152 

70 IF eft=*S* THEN POKE 8B2EA.0 

80 CALL 56945 

90 DATA 0,13,20,12,24,26,16,10,5,1, 
2,11,16,25,3,15 


CINTA 


10 FOR x=8B000 TO 86027 
20 READ a$:a=VAL("8"+at) 

30 POKE x,a 
40 NEXT 

50 NODE ::LOCATE 5,10:PRINT "Enerqi 
a infinita ? ";;WHILE e$=" !i :e$=UPPE 
EfCINKEYi):WEND:PRINT et 
60 IF e*="S* THEN POKE *6020,0 
70 NODE 0:CALL 8B000 
50000 DATA 6,I,21,27,B0,11,0,CO,CD, 
77,BC,EB,CD,83,BC,CD,7A,BC,3E,1F,32 
,8E,2,3E,60,32,86,2,C3,F4,1,3E,30,3 
2,A7,S2,C3 I F2,A3,43 

DISCO 


10 QPEN0UT"d":MEMORY 899:CLOSEOUT 
20 BORDER 0:H0DE 0:FCR n=0 TO 1S:RE 
AD a:INK n,a:NEXT:L0AD‘dustsc*,431S 
2 

30 LOAD"dust1 


25, las que queramos. 

— Fase de comienzo. Hay 
100 donde elegir. 

— Vidas infinitas. Bastantes, 

6 no ? 

CINTA 


10 1 Pokes KRAKOUT (cinta) 

20 Pedro H. Cuenca. 

30 FOR 7=87000 TO *7058 
40 READ AS:POKE X,VAL(*S*+A$) 

50 NEXT 
60 NODE i 

70 LOCATE 5,7: INPUT "Nuisero de Vida 
s (1-25) * ; m»$: nu»=VAL( nsal) : I F ru 
»<! OR nuifi>25 THEN LOCATE 1,7:PRINT 
STRINGS-(38,” ”);CHR*(7!;:G0T0 70 
80 POKE 87054,nu> 

90 LOCATE 5,10: INPUT "Ease de cossie 
nzo (1-100) ”;fa5e$:fase=VAL(Fa5e$) 
:IF faseCl OR fase)100 THEN LOCATE 
UOIPRINT STRIN6*(38," *)JCHR*(7J} 
:GOTO 90 


220 RETURN 

230 DATS 6,0,1I,0,20,CD,77,EC,E3.CD 
,83,BC,CD,7A,3C,21,26,70,11,40,0,1, 
34,0,ED.SO,3E,40,32,5,I, F, 32,6.1,C 
3,0,1,18,4,AF,32,3A,7B.21,68,0,11,B 
6,52,1,8,0,ED,B0,18,A,AF- 32,C!,52,3 
2,C2 f 52,3 2,(3,52,3E,0,32.CO,52,32,5 
4,52, C3,94,4E, 3E, 0,32,94,52,3E, 2.. 32 
..95,52,0 


BOMB JACK 


Una ayuda para 
el Super Raton 

Bomjack vuelve a deleitarnos 
con sus cabrioletas circenses, en 
otra aventura contra malvados 
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seres de funestas intenciones. A 
pesar de que en esta segunda 
parte cuenta con un cuchillo 
que anadir a sus superpoderes, 
nosotros no vamos a permitir 
que tenga que esforzarse mas de 
la cuenta para salir airoso de su 
mision. Le vamos a conceder, 
ni mas ni menos, la 
oportunidad de elegir el numero 
de vidas que quiera, entre 1 y 
255, o la posibilidad de tener 
vidas infinitas. Esto ultimo no 
esta nada mal, pero esperemos 
que no se aburra, ya que 
tiempo va a tener para ello. 



10 MEMORY 5799:BORDER 0:CIS:FOR 1=0 
TO IS: READ a: INK f.alfOT f:MODE 0 
:LOAD ”■b2screen.bin",49152:LOAD "i 
h2code. BIN" .,6000 

20 MODE 1:LOCATE 5,10:PRINT “Vidas 
infinit-as 7 WHILE vi$="":vi$=UF'F' 
ERJCINKEVt}:WEND:PRINT vi$:IF vit=" 
S" THEN POKE 51SEE,0:SOTO SO 
30 LOCATE 5,15: INPUT "Itoero de vie 
as (1-255) “jmJSvUIF nupvifl OR nu 
fiivi>255 THEN PRINT CHRtf7):LOCATE 1 
,IS:PRINT STRINGS(39, H ">f:SQ T 0 30 
40 POKE SlASS.nuiivi 
50 MODE 0:CALL 6000 
60 DATA 0,26,1,8,11,10,14,5,20,15,2 
1,25,6,31,12,24 



^Quien da 
mas ? 


Generalmente los cargadores 
conceden vidas infinitas, energfa 
infinita, etc. Esto, aunque muy 
importante, es sum amen te 
vulgar. Sin embargo, siempre 
hay alguien que da mas, por 
ejemplo, observad lo que 
ofrecen estos cargadores de 
cinta y disco para Nonamed: 

— Vidas infinitas. Lo de 
siempre. 

— Control de enemigos. 

Esto ya es serio. Con esta 
opcion los enemigos apareceran 
o desapareceran segun 
queramos, pulsando la tecla fija 
MAYS o CAPS LOCK. 

— Juego sin enemigos. Es 
por si queremos dar un paseo. 

,;Ofrece alguien mas? 



CINTA 


1 aeriF 1999;dir e=209S:e j ec=2000 

10 0PENDUT M":MEMORY sesdLOAD ”!t 

20 POKE dire,201 :CALl ejec 

30 MODE 1:LOCATE 5,10:PRINT"Quieres 
vidas infinitas ? :i#HILE a$•=“":a 

j=UPPER$(INKEVJ):WEND:FRINT at:IF a 

t= s S“ THEN POKE 59007,0 

40 LOCATE 5,15:PRINT "Control de en 


esiqos 7 :WHILE cot=“":tot=ypPERt 

(INKEY$):WEND 

50 PRINT tot:IF cot="S” THEN GDSUB 
100:GOTO 80 

60 LOCATE 5,20:PRINT ''Jueqo sir- ene 
i»igos 7 ";: WHILE se$=*":5e$=UPPEfit( 
INKEVt):MEND 

70 PRINT set:IP set="S" THEN POKE 5 

39C3.201 

80 CALL 40902 

90 DATA 0,16,26,12,24,4,8,15,20,1,2 
,11,25,17,3,6 

100 RESTORE 130:POR *=58000 TO 5B04 
1: READ nuffit:nus=VALC'i'+nust):POKE 
x,num:NEXT 
110 CALL 58000 
120 RETURN 

130 DATA 21,38,80,11.17,10,6,81,00, 
EF,80,21,35,80,11,32,0,1,5,0,03,59, 
SC,36,46,00,IE,88,C8,3E,7,CD,SA,88, 
3A,C3,99,PE,2A,20,6,3E,CS,32,C3,99, 
C9,3E,2A,32,03,99,09,0,0,0,0,0,0,0, 
0,0,0,0,0,0 

DISCO 


10 BORDER O:n0DE 0:MEMORY 7733:FOR 
N=0 TO 15:READ A:INK N- A:NEXT;LOAD" 
SCHOK*,49152 
20 LOAQ’AON bin 

30 MODE 1:LOCATE 5 I tO:PRINT"Q l jieres 
vidas infinitas 1 * * * * * 7 *i;BHILE a$='"':a 
t=(FPERt{ I.N*lEVtj;UEND:PRINT at: IF a 
t=‘S e THEN POKE 59007,0 
40 LOCATE 5,15:PRINT "Control de en 
esigos ? “"WHILE: co$=““:cot=“PPERt 
C INKEY‘$): WEND 

50 PRINT cot:IF co$=*S“ THEN GQSUB 
100:GOTO 80 

60 LOCATE 5,20:PRINT "Juego sin ene 
migos 7 “LlIHlLE set="":set=UPPERt( 
INKEVt):VEND 

70 PRINT set:IF set=“S“ THEN POKE 5 
33C3.20! 

80 CALL 40302 

30 DATA 0,16,26,12,24,4,3,15,20,1,2 
ill,25,17,3,6 

100 RESTORE 130:608 x=58000 '0 5804 

1:READ nu®=VAL(: YOKE 

x.nu«ieT 

110 CALL 58000 

120 RETURN 

130 SA T A 21,38,80,11,17,BO,6,81.CD, 
EF,8C,2 S,35,BO,11,32,0,1,5,0,C3,E9, 
8C,3E,46,CD,It,88 C8,3E,7 CD,SA,BE 
3A, C'3 ,99, FE.. 2A, 20,6,3E.. C9.32, CS. 99, 

C9,3E,2A ,32,93,99,09,160,0,0,0,0,0, 
c, 0 , 0 , 0 , 0.0 
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MUSICAL 


WHEN THE SAINTS 


El programa que nos 
manda Miguel Macias 
dejara sorprendido a mas 
de uno cuando escuche la 
variedad de instrumentos 
y, sobre todo, el solo 
de clarinete que ha logrado 
nuestro lector. 



por los radiocascos 
como estos } que en 
breve recibiras. 


1 VHEI THE SAIITS 

3 ' 

5 ' Miguel Macias 

7 ' 

10 CLS:DEFIIT a-v:DIM sC44):FOR j=0 TO 
12.-READ s<j):MBIT: FOR j=13 TO 44:s(j)=s 
(j-12)/2: NEXT 

20 LOCATE 4,11:PKIIT""; STRHGSC32,154) 

: PKIIT TAB(4)""SPC(32) ,,M : PRIIT TA 
B<4>" VHES THE SAIITS GO MARCHIMG II 
PRIIT TAB(4)** 0 SPC<32>” M : PRIIT TAB(4 
>""; STRIIG$(32,154 > ; H ": RAIDOMIZE TIME 
30 EIV 1,3,5,1.1,0.9,3,-5,1:EIV 2,3,5 t 1 
,1,0,24,3,-5,1:EMV 3,3,5,1,1,0,54,3,-5, 
1:ESV 4,3,5,1.1, 0,114.3.-5,1: EIV 5,3,5, 
1.1.0,84,3,-5,1:EIV 6,1,0,15:E1V 7,1,0, 
30: EIV 8,1,0,60 

40 EIV 9,2,8,1,1,-2,1,1,-1,21,6,-2,1:EI 
V 10,2,8, 1,14,-1,2:EIV 11.2,8,1,7,-2,3, 


2.7,1,5,-3,1:EIV 12,3,6,1,6,-3,2:EIV 13 
,1.18,1,6,-3,1,1,0.1,1,18,1,6,-3,1:EIV 
14.2,8,2,8.-2.2:EIV 15,2,8,1,8,-2,1 
50 HIT 1,2,3,1.6,-1,2,1.0,31,5,-1,8,5.1 
,5:EIT -2,1,0,1.1,1,3,2,-1,3,1,1,3,1,0, 
2:EIT 3,1,0,74,23,-2,2,1,-1,1,1,0,30:El 
T 4,2,-3,1,6,1,1,1,0,7:BIT -5,1,1,7,1,- 
l,7,l f 0,l,l,-1,7,1,1,8 
60 SOUID 7,0,0,0,6:SOUID 7.500,0,0,13,0 
,5:SOUID 7,300,0.0,10,0,5:SOUID 7,300,0 
,0,10,0,5: SOUID 7,500,0,0.12.0,5:SOUID 
7,500, 0, 0,10, 0,5: SOUID 7,500, 0, 0.12,0,5 
70 SOUID 7.300.0,0.12.0,5:SOUID 7.300,0 
, 0.10, 0.5: SOUID 7,300,0, 0,12, 0, 5: SOUID 
7,500,0,0,10.0.5: SOUID 7,300,0,0,13.0,5 
:SOUID 7,500,0.0,13,0,5:SOUID 7,300,-3, 
0,14, 0,5:SOUID 7,400,-3,0,14. 0,5:SOUID 
7,500,0,0,12,0,5 

80 RESTORE 990:FOR k=l TO 4:READ a,b:S0 
UID 2,s(a>,0,0,b,2:IEXT 
90 1=28:n=42:n=4:o=2:q=4:GQSUB 360:1=42 
:n=28: n=2: o=4:q=5:GOSUB 360 


100 SOUID 49,s<32),0,0.2,5: SOUID 42,500 
.0,0,10,0,5:SOUID 28,s<20>,0,0,2,2:SOUI 
D 7,300,-2.0,13,0,5:SOUID 7,400.-3,0.14 
,0,5:SOUID 7,500,0,0,10,0,5:FOR j=l TO 
3:SOUID 2,s<35),0, 0,2,1:IEIT:GOSUB 770 
110 SOUID 42,5(44),135,15,2:SOUID 49,s< 
8).0.0,9.4:SOUID 28,0,-2,0.12,0,1:SOUID 
l,s<12>. 0,0.9. 4: SOUID 4, 0,-2, 0,12, 0,1: 
SOUID l,s(15),0,0,9,4:SOUID 4,0,-2,0,12 
,0,1:SOUID l,s(12),0,0,9,4:SOUID 4,0,-2 
,0,12,0,1:SOUID 1,s(8>,0,0,9.4:SOUID 4. 
500,0,0,10,0,5 

120 SOUID 7,0,0,0,7:SOUID 7,300,-3.0,15 
,0,5:SOUID 7,0, 0,0,7:SOUID 7,400,-3,0,1 
5.0,5:SOUID 7,0,0.0,7:SOUID 7,500,-4,0, 
12,0,5 

130 FOR k=l TO 56:r=RID(l)*16+l:0I r GO 
SUB 170,180,190,200,210,220,230,240,250 
,260,270,280,290,300,310,320,330,340,35 
0: IE XT 

140 SOUID 7.500,0,0,12,0,5:SOUID 2,s(15 
>,0,0,9,4:SOUID 5,0,0,0,6:SOUID 2,s(13) 
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,0,0,l,4iSOUID 5,300,-2,0,13.0,5;SDOID 
l,s( 12),0,0,9,4: SQUID 2.s(24).0,0.2.2;S 
OtJID 4,400,-2,0,13,0,5:SOUID l,s(10),0, 
0,9,4:SOUID 2,s(25>,0,0,2,2:SOUID 4,500 
,-3,0,15,0,5 

150 1-26: jf= 42: n=4 ■ o=2: q=4: GOSUB 360: SOU 
ID 42,s(32), 150,15,0,3:SOUID 49,s(8>,0, 
0,9,4:SOUID 26,500,0,0,10,0,5:SOUID l,s 
(5) , 0.0,9,4: SOUID 4.300,-3,0,15, 0,5: SOU 
IE l,s(3>,0,0,9,4:S0UID 4,400,-3,0,15,0 
,5. SOUID 1,s(12), 0, 0,9,4: SOUID 4,500,-2 
,0,13,0,5 

160 SOUID 1, s(8) , 0, 0,9,4: SOUID 4,500,0, 
0,10, 0,5: WHILE SQ(2> >128: VEID: FOR k=l T 
O 1500: IBXT:CLS: BID 
170 SOUID 7,500,0,0,10,0,5: FETUEI 
160 SOUID 7,300,0,0,10,0,5: RETURI 
190 SOUID 7, 0,0,0,10, 0,1: RBTURI 
200 SOUID 7,500, 0, 0,11,0,5: RETURI 
210 SOUID 7,300,0,0,11, 0,5: RETURI 
220 SOUID 7,0,0, 0,11,0,1 RETURI 
230 SOUID 7,500,-2.0,12,0,5: RETURI 
240 SOUID 7,300,-2, 0,12, 0,5: RETURI 
250 SOUID 7,0,-2,0.12,0,1:RBTURI 
260 SOUID 7,500,-2,0,13,0,5: RBTURI 
270 SOUID 7,300, -2.0,13,0.5;RBTURI 
260 SOUID 7. 0,-2, 0,13, 0,1: RBTURI 
290 SOUID 7,500,-3, 0,15, 0,5: RETURI 
300 SOUID 7, 300,-3.0,15. 0,5;RETURI 
310 SOUID 7,0,-3.0,15,0,1: RBTURI 
320 SOUID 7,500,-3,0,14,0,5: i=k+l:RETUR 
I 

330 SQUID 7, 300,-3, 0,14, 0,5: k=k+l:RETUR 

I 

340, SOUID 7,0,-3, 0,14,0. l:k=k+l: RBTURI 

350 SOUID 7, 0,0,0.7: RETURI 

360 READ a: IF a=-l THEI RBTURI 

370 READ b, c,cl,d, dl:OI a GOTO 410,400, 

390,360 

360 READ e,el 

390 READ f.fl 

400 READ g.gl 

410 01 b GOTO 450,440,430,420 
420 READ h, hi 
430 READ 1,11 
440 READ j,Jl 

450 SOUID 1,500,0, 0,10, 0,5: SOUID 49,s<d 
),0,0,dl,q:SOUID ■,s(c),0,0,cl,2:S0UID 
n, 0,0,0,11,0,2:01 a GOTO 490,460,470,46 

0 

460 SOUID o, s(e), 0,0, el, 2 
470 SOUID o,s(f),0,0,fl,2 
460 SOUID o,s(g),0,O.gl,2 
490 01 b GOTO 530,520,510.500 
500 SOUID l,s(h),0,0,hl,q 
510 SOUID 1,6(1),0,0.11,q 
520 SOUID l.B(j).0,0,Jl,q 
530 FOR k=l TO 3 

540 READ a, b: 01 a+1 GOTO 590,560,570,56 


0,550 

550 READ c, cl 
560 READ e.el 
570 RBAD f.fl 
580 RBAD g.gl 

590 01 b+1 GOTO 640,630,620,610,600 

600 READ d,dl 

610 READ h, hi 

620 RBAD 1,11 

630 READ j.jl 

640 IF k=3 THEI SOUID n,500,0,0,12,0,5. 
SOUID n,300,0,0,12,0,3:SOUID »,400,-3,0 
,15, 0,5: GOTO 660 

650 SOUID a, 500,0,0,10,0,5: SOUID n,0,0, 

0 , 11 , 0,2 

660 01 a+1 GOTO 710,700,690.680,670 

670 SOUID o,s(c),0,0,cl,2 

680 SOUID o,s(e),0,0,el,2 

690 SOUID o,s<f),0,0,fl,2 

700 SOUID o,s<g), 0, O.gl,2 

710 01 b+1 GOTO 760,750,740,730,720 

720 SOUID l,s<d), 0, 0,dl,q 

730 SOUID l,s(h),0,0,hl,q 

740 SOUID l,s(l), 0,0, ll.q 

750 SOUID l,s(j),0,0, jl,q 

760 IEXTiGOTO 360 

770 READ a: IF a=-l THEI RETURI 

780 RBAD b,c,d,dl,d2:DI a GOTO 820,810, 

800,790 

790 READ e,el,e2 
800 READ f,f1,f2 
610 READ g,gl,g2 

820 SOUID 28 ,0,-2,0,12,0,1:S0UID 49,s(b 
),0,0,9,4:SOUID 42,s<d>.0,0,dl,d2:SOUID 
4,0,-2,0,12,0,1:SOUID l,s(c),0,0,9,4:0 
■ a GOTO 860,850.840,830 
830 SOUID 2,s(e),0,0,el,e2 
840 SOUID 2,s(f),0,0,fl,f2 
850 SOUID 2,s(g),0,0,gl,g2 
860 FOR k=l TO 3 

870 RBAD a,b,c:GI a+1 GOTO 920,910,900, 
890,880 

880 READ d,dl,d2 
890 READ e,el,e2 
900 READ f,fl,f2 
910 READ g,gl,g2 

920 SOUID 4, 0,-2,0,12, 0,1:SOUID 1.6(b), 
0,0,9,4: SOUID 1. s<c). 0,0,9, 4: SOUID 4,0, 
-2,0,12,0,1:01 a+1 GOTO 970,960,950,940 
,930 

930 SOUID 2,s(d),0,0,dl,d2 
940 SOUID 2,6(e),0,0,el,e2 
950 SOUID 2,5(f), 0, 0, f 1, f2 
960 SOUID 2,s(g),0,0,gl,g2 
970 IEXT:GOTO 770 

960 DATA 0,568,536,506.478,451.426,402, 
379,358,338,319,301 

990 DATA 20,2,20,1,24,2,25,2,1,2,27,4,8 
,9.,7,,2,3,9,,7,3,2,.6,20,2,20,1.8,9,,7 


,2,2,24,2,25,2.3,9, ,7,1,2.27,4,8,9, ,7,, 

2.3.9. ,7,3,2, ,6,20,2,20.1,8,9, ,7,2,2,24 

,2,25,2,3,9,,7.1,2,27.3.8.9,,7,1,2,24,3 
,3,9, ,7,1,2,20,3,8,9.,7,1,2,24,3,3,9, ,7 
1000 DATA 1,2,22,4,7,9,,7,,2,3,9, ,7,3,2 
,,7,23,1,24,2,7,9,,7,2,2,27,1,24,2,3,9, 
,7,1,2,20,5,8,9,,7,1,2,20.2,8,9.,7,1,2, 

24.3.6.9, ,7,1,2,27,3,6,9,,7,2,2,27,2,5, 
9,25,4, ,7,,2,5,9,.7,1,2,.7,4,9,.7,2,2,2 

4.2.25.2.4.9.. 7 

1010 DATA 1,2,27,3,3.9,,7,1,2,24,3,8.9, 
,7,1,2,20,3,3,9. ,7.1,2,22,3,7,9, ,7,1,2, 

20.5.8.9.. 7.1.2..7.3.9..7.3.2..6.20.2.2 
0,1,8,9, ,7,2,1,24,2,25,2, ,8, -1.1,2.27, 4 
,,7,32,2,.3,32,1,29,2,32,2,3,2,.6,20,2, 

20.1.. 6..7.2.1.24.2.25.2..8.1.2.27.4..7 
.32,2,,3,32,1,29,2 

1020 DATA 32,2,3,2, ,6,20,2,20.1. .6, ,7,2 
,1,24,2,25,2,,8,1,2,27,3,,7,32,2.1,2,24 
,3. ,7,32,2,1,2.20,3, .7,32,2,1,2,24,3, ,7 
,32,2,1,2,22,4,,7,31,2,,3,31,1,30,2,31, 

2.3.2, .7,23,1.24.2, ,7,27,1,2,2,27,1,24, 

2.29.2.31.2.3.1.27.1.36.3.24.2.. 6.3.1.2 
0,2,19,1,18.2,34,3 

1030 DATA 2.1..7,27,1,32,3.3,1.29.1,27, 

1.29.2.36.3.4.3.27.1, ,7,25,1,27,1,25,5, 

27.1.28.1.. 3.29.1.32.1.29.2.2.1.20.2.20 
,1,28,3,2,1,24,2,25.2. ,8.1,2,24,3,39,2, 

36.2.1.3.22.3.32.1.29.2.27.2.1.3.20.3., 

6.26.1.27.1.1.3.22.3.31.1.34.1.31.2, -1 
1040 DATA 1,8,12,35.4,1,.13,14,1,15,12, 

32.3.2.1.10.8.29.3.2.1.8.3.27.4.1, .6,8, 
2,10,8, ,7, ,35,2,1,2,12,8,35,2,1,35,2,1, 

1.15.12.35.4.1, ,8,15,1,12,13,32,3,2.1,1 

5.12.29.3.2.1.10.7.31.4.1., 10.13,3,3,5, 

, 7, , 35,1, 2, 36, 2.2,2.6.7,39,1,2,36.2,1 
1050 DATA 1,8,20,39,3,2,2,8,20,,7..36,2 
,2,1,6,20,39,3,2,2,6,20, , 7,, 36,2,2,1.5, 

20.39.3.2.2.5.20.. 7..36.2.2.1.4.20.40.3 
,1,2,4,20, ,7. ,36,2,2,1,3,8,39,4,2, ,5,3, 

1.10.3.39.3.2.1.5.7.39.3.1, -1 

1060 DATA 1,2,27,4,8,9.,7,,2,3,9,,7,3,2 
,.6,20,2,20,1,8.9,,7,2,2.24,2,25,2.3.9, 
,7,3,2,27,2,8,9, ,6,29,5, , 7.. 2, 3,9,, 7,2, 

2.15.2.15.1.8.9.. 7.3.2.20.1.20.1.24.2.3 
,9, ,7,3,2,27,2,8,9. ,6,24,2, ,7,2,2, ,6,20 
,2,3,9,,7,3,2,15,2,20,1,22,1,8,9,.7 
1070 DATA 3,2,24,1,27,1,24,2,3,9,,7,3,2 
.22,2,7,9,31,1,34,1,,7.4,2.27,1,31,1,25 
,1,27,1,3,9,,7,3,2,22.2,23,1,24,1,7,9,, 

7.3.2.25.1.27.1.24.2.3.9.. 7.3.2.27.2.8, 

9.. 6.24.2..7.2.2.20.1.19.2.8.9..7.3.2.1 
8,'2,27,1,29,2,6,9..7.2,2,27.1.29,2,6,9, 
,7 

1080 DATA 3,2,27,1,5,9,25,2,32,4,,7,,2, 

5.9.. 7.1.2..6.4.9..7.3.2.23.1.24.1.25.2 
,4,9, ,7,3,2,27,2,3,9,26,1,27,1,,7,3,2,2 

8.1.24.2.. 6.8.9..7.4.2.27.1.27.1.26.1.2 

7.1.7.9., 7, 3,2,29,1,31.2,, 6,3,9,, 7, -1 
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Acerca del ASM 


Tengo un 6128 y me 
gustarfa me explicaran como 
usar el programa o 
programas que vienen en el 
disco de regalo, como el 
ASM o el MAC, etc. Ya que 
me gustaria copiar los 
listados de su revista en 
Codigo Maquina y no se 
como ensamblarlos 
suponiendo que se pueda 
hacer con estos. 

Tambien les agradecena 
siguieran explicando en su 
revista los programas de 
utilidad que vienen en los 
discos de regalo, pues como 
toda la informacion viene en 
ingles no he conseguido saber 
para que sirven muchos de 
ellos. 

Miguel Angel Olmos 

Los programas a los que hace 
referenda en su carta, el ASM y 
el MAC, efectivamente son un 
ensamblador, un desensamblador, 
tal y como usted inluia. Ahora 
bien, este ensamblador pertenece 
no al Z80, como seria de desear, 
sino al 8080, aunque es 
totalmente compatible con el 
anterior. For otra parte, estdn 
preparados para correr, tanto ellos 
como los programas que generan 
bajo CPM. ' 

Por esta razon en ningtin caso 
podra utilizarlos bajo el sistema 
operativo propio del Amstrad, el 
AMSDOS. No obstante, estamos 
preparando un ensamblador, que 
estamos seguros de que sera de su 
agrado, con el que podra utilizar 



Sin duda 

ALGbMA 


y estudiar todos los programas en 
Codigo Maquina que sean 
publicados en nuestras paginas. 

Solo 664/6128 

^MB 

Soy un poseedor de un 
Amstrad CPC 464 de 64 K. 

Mi problema es que 
cuando tecleo un programa 
donde aparece I, al ejecutarlo 
posteriormente me sale el 
mensaje: Unkonown 
command. 

Segun un manual del 
usuario que me dieron al 
comprar el ordenador eso 
quiere decir que Basic no 
encuentra un comando 
externo que corresponda a lo 
que se ha escrito tras I. 
,:Podrian explicarme que 
significa y como solucionarlo? 

Javier G. A. A. 

Por su corta carta, deduzco que 
su problema se encuentra con los 
nuevos comandos que incorpora la 
ROM del disco del 664 y 6128, 


y con los que su ordenador, un 
464, no cuenta en su repertorio de 
instrucciones. La limca solucion a 
este problema es que usted 
incorpore una urndad de disco a 
su equipo. No obstante, si por la 
utilizacion que usted de a su 
ordenador no precisa de utilizar 
una unidad de disco, tampoco 
necesitard de estos comandos, ya 
que estos fueron implementados 
precisamente para completar la 
gestion del periferico de 
almacenamiento, en su caso el 
cassette, que resultaba insuficiente 
para el manejo total y efectivo de 
un disco. 

Las variables 
del sistema 

,;D6nde podria informarme 
con detalle de las Variables 
del Sistema del Amstrad 
CPC-6128? El Spectrum 
tiene una Variable del 
Sistema llamada PIP (23609) 
que regula la duracion del 
chasquido del teclado; ,;posee 
el CPC-6128 obra variable 
con similar funcion?, ,;cual 
es? 

Francisco Jimenez Bullon 

Existen varios libros editados 
que contienen una completa y 
detallada explicacion de todas las 
variables del sistema del 464, 

664 y 6128. Uno 

de ellos es «Claves para el 

Amstrad» 

de la editorial Elisa, donde podra 
encontrar, aunque de forma algo 
escueta, toda la informacion que 
precisa sobre este tema. 

Respecto a su segunda 
pregunta, solo decirle que en el 
Amstrad no hay ninguna 
variable que aumente o disminuya 
el chasquido del tecleo, 
sencillamente porque no existe tal 
chasquido. Las dos umcas 
variables que hacen referenda a 
las teclas, son: &B633 y &B634, 
que contienen el valor de 
repeticion de las teclas y el valor 
del retardo antes de la repeticion 
de una tecla. 


NECESITAMOS personas 

que conozcan profundamente lenguaje ensamblador del 8086/8088 y 
dominen los ordenadores compatibles IBM PC desde el punto de vista del 
Lenguaje Maquina. Se valoraran en gran medida conocimientos acerca del 

DOS. 

Si usted es uno de ellos pongase en contacto con nosotros r/ipidamente en 
la direccion que se indica a continuacion, poniendo en lugar muy visible del 

sobre: 

Referencia DOS AMSTRAD Semanal 
Nuestra direccion es: 

AMSTRAD Semanal 

Carretera de Irun, km 12,400. Fuencarral. 28049 Madrid. 
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Concurso de 
diseno grafico 
por ordemador 
Amstrad Semanal 


C 


I rear imageries en una pantalla siempre 
es un desafxo a la imaginat ion, a la creatividad 
y a la peripecia programando. Por todo 
ello, AMSTRAD Semanal organize 
entre todos sus lectores un concurso de diseno 
grafico sujeto a las bases que se detallan mas 
abajoi 



Bases del concurso 


1. Entran a concurso todos los Amstrad 
CPC, PCW y el PC. 

2. Se establecen tres categorias distintas 
dentro del concurso, cada una de ellas 
correspondiente a cada uno de los ordenadores 
citados en el punto 1. Hemos elegido este metodo 
para que ninguno dc los concursantes se 
encuentre en desventaja debido a que las 
capacidades graficas de su maquina sean menores 
que las de otro modelo Amstrad. 

3. El concurso se refiere solamente a disenos 
graficos efectuados en pantalla, aunque no 
importa el metodo escogido para generarlos. Es 
posible emplear cualquiera de los programas de 
diseno grafico comerciales que existen, as! como 
crear la imagen empleando un programa en Basic 
o Codigo Maquina. 

4. Las imagenes se enviaran a nuestra 
redaccion en cinta o disco, y pueden ser un 
programa Basic que las genere, un bloque de 
bytes o el metodo que se considere mas 
adecuado, teniendo en cuenta que el jurado que 
elija los ganadores solo considerara lo que se vea 
en pantalla a nivel grafico: ni sonido, ni 
animacion. 

5. El jurado, constituido por profesionales del 
diseno, ilustracion y programacion, observara 


cada una de las pantallas durante el tiempo 
necesario y mediante los metodos que estime mas 
oportunos, seleccionando los ganadores. Su 
decision sera inapelable. 

6. El plazo de recepcion de las pantallas 
finalizara el dla 1 de septiembre de 1987. 

7. Ninguno de los disenos enviados se 
devolvera al remitente. AMSTRAD Semanal se 

re ser v a los derechos de publicacion dc los mismos 
en el momenta y condiciones que estime 
oportunos, citando a su autor. 

8. Los ganadores se haran publicos en la 
segunda quincena del mes de septiembre de 
1987, a traves de la revista AMSTRAD Semanal. 

9. En total, se entregaran nueve premios, dos 
por categoria. Los primeros seran los siguientes: 

Amstrad CPC: UN DIGITALIZADOR T31 
VIDEO 

Amstrad PCW: TABLETA GRAFICA 
GRAFPAD 

Amstrad PC: TABLETA GRAf ICA 
GRADPAD-5 

y los segundos, dos para cada categoria, seran 
unas excelentes cadenas musicales alta lidelidad y 
estereo. 

10. El simple hecho de participar en el 
concurso presupone la aceptacion incondicional 
de sus bases. 

Nuestra direccion es: 

AMSTRAD Semanal. 



























Jhsta seccion esta dedicada a todas las compras, ventas, clubs de 
usuarios de Amstrad, programadores y, en general, cualquier clase de 
anuncio que pueda servir de utilidad a los lectores. Todo aquel que lo 
desee puede enviarnos su anuncio, mecanografiado, a: HOBBY 
PRESS, S. A AMSTRAD Semanal. Apartado de Correos 232 
Alcobendas. Madrid. 

IA BS TENERSE PIRATAS! 


Mercado 

CCMUN 


Urge vender Amstrad PC 
1512, con monitor en color y 
una unidad de disco (con 
rejillas de ventilacion). 
Completamente nuevo (mas de 
11 meses de garantia); sin uso. 
Incluyo programas como 
Wordstar, dBase III, 
Turbographix, Multiplan, etc. 
Precio: 165.000 ptas. 
Interesados escribir a Luis 
Fernandez Vazquez. Avda. 
Camelias, 104 (antiguo 118), 
3.° A. 36211 Vigo 
(Pontevedra). Tel. (986) 

29 56 92. 


Vendo CPC 6128 monitor 
fosforo verde. Octubre 86. 
Impresora de matriz. 

Programas en disco y cintas. 
Muchas utilidades y juegos. 
Libros y revistas. Tel. (964) 

47 28 14 de 9 a 13 y de 15 a 19 
boras o bien 47 36 90 de 13 a 
15 y 19 horas en adelante. 


Desearfa contactar con 
usuarios del Amstrad 6128 para 
intercambios de juegos. Llamar 
por tel. 370 40 12 preguntar por 
Paco. 


Cambio unidad de disco 
Olivetti XM 4312 de 640 K, 
por segunda unidad de disco 
para Amstrad CPC 6128. 
Interesados llamar al tel. (93) 
383 73 28, de 2 a 3 de la tarde 
o de 10 a 11 de la noche. 
Preguntar por Mateo. 


Se ha formado un club de 
usuarios de todos los CPCs de 
Amstrad, en Albacete en el que 
tenemos disponibles para vender 
e intercambiar, mas de 400 
programas de todo tipo. 
Interesados escribir a Club 
Usuarios Albacete. Bernardo Cruz 
Molina. Francisco Pizarro, 14. 



“Sdbado Chip”, de 17a 19h. 
















02004 Albacete. O bien llamar 
al tel. (967) 22 03 51 de 2 a 5 
de la tarde y de 9 a 12 de la 
noche. 


Vendo Amstrad CPC 464 
monitor F.V. con manuales y 
ocho cintas. Embalaje original 
Regalo fundas. Precio 45.000 
ptas. Todo en perfecto estado. 
Llamar al tel. (93) 322 98 26. 
Barcelona. 


Tengo muchos programas en 
disco de PCW 512-256. 
Mandare lista y contestare. Me 
interesan los de contabilidad 
domestica, empresarial y 
comercial, tambien algun juego 
y, ademas, un lichero medico. 
Sobre este ultimo desearia 
conocer alguien para hacerlo a 
mi gusto. Santiago Redondo 
Caspar. Medico. Paracuellos de 
Jiloca (Zaragoza). 


Vendo CPC 6128 monitor 
fosforo verde. Octubre 86. 
Impresora de matriz. 

Programas en disco y cintas. 
Muchas utilidades y juegos. 
Libros y revistas. Tel. (964) 

47 28 14 de 9 a 13 y de 15 a 19 
horas o bien 47 36 90 de 13 a 
15 y 19 horas en adelante. 


Vendo Amstrad CPC 464 

monitor F.V. con manuales y 
ocho cintas. Embalaje original 
Regalo fundas. Precio 45.000 
ptas. Todo en perfecto estado. 
Llamar al tel. (93) 322 98 26. 
Barcelona. 


Me urge comprar muchos 
Vic-20 (que funcionen). Francesc 
Sota. Entenza, 24.08015 
(Barcelona). Tel. 325 25 78. 


Necesito urgentemente 
ordenador Spectrum 48 K, con 
cable, transformador, e 


interface, ofrezco hasta 10.000 
ptas., interesados llamar a 
Dioni. Tel.: (91) 880 23 53. 
Madrid. Llamar de 2,30 hasta 
4,30 y a partir de las 21 horas. 


Vendo CPC 6128 monitor 
fosforo verde. Octubre 86. 
Impresora de matriz. 

Programas en disco y cintas. 
Muchas utilidades y juegos. 
Libros y revistas. Tel. (964) 

47 28 14 de 9 a 13 y de 15 a 19 
horas o bien 47 36 90 de 13 a 
15 y 19 horas en adelante. 


Hola somos unos usuarios 
del Amstrad y desearia cambiar 
pokes para el CPC 464 que 
escriban a Miguel A. Rincon Simon. 
Villardondiego, 27, l.° A. 
Vicalvaro. 28032 Madrid. Se 
les contestara rapidamente y 
que por favor que ponga la lista 
de pokes que quieran cambiar 
con nosotros. 



JKJ, 
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Todoslos sabados, de 5 a 7 
de la tarde, en “Sabado Chip’ 
Dirigido por Antonio Rua. 
Presentado por Jose Luis 
Arriaza, hecho una 
computadora. Dedicado en 
cuerpo y alma al ordenador, 
y a la informatica. Haciendo 
radio chip... estilo Cope. 
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RADIO POPULAR 

... de chip a chip 





















Mercado 

ccmun 


Intercambio programas para 
Amstrad CPC 464. Tengo unos 
100 programas, entre ellos hay 
compiladores, copiones, 
utilidades y juegos. Tambien 
hago programas a medida (en 
Basic y Pascal). Interesados 
escribir a Juan Enrique Gomez 
Perez. Priorato 111, 8.° D. 
Leganes (Madrid). 


Vendo Amstrad CPC 6128. 
Monitor color. Disco un aho 
poco uso. Manual y discos. 
Todo por 85.000 ptas., razon 
Pedro Garcia. Tel. (91) 

218 63 91. Tardes. 


Vendo Amstrad PCW 8256, 
completo y en perfecto estado. 
Sin uso. Incluyo los manuales 
de Basic y del usuario, junto 
con los discos del sistema 
(CP/M plus, procesador 
Locosprit, Logo y utilidades). 
Ademas incluyo Multiplan, 
dBase II, procesador Wordstar 
y los compiladores siguientes: 
Fortran 80, Cobol 80, Lenguaje 
C, Pascal/Mt + , Turbopascal y 
Modual. Un interprete y 
compilador de Basic con 
manuales y cuatro discos mas. 
Precio razonable. Interesados 
llamar al tel. 711 22 70 de 
Madrid. Razon Rafael. 


Deseamos contactar con 
usuarios de Amstrad CPC 
6128, para el intercambio de 
juegos y sobre todo utilidades 
en disco. jAbstenerse en cinta! 
Poseemos mas de 400 
programas, entre ellos las 


ultimas novedades. Se promete 
contestar a todos con rapidez y, 
por favor, mandar lista. 

Escribir a Jose Bollo Delgado. 
Pacheco, 24, 3.°. Salt. 1*7190 
(Gerona). Tel.: (972) 23 40 46. 
Tambien a Xavier Parramon 
Porcell. Angel Guimera, 95, 4.°, 
l.°. Salt. 17190 (Gerona). Tel.: 
23 42 06. jEl club espera todas 
vuestras cartas! 


Vendo Amstrad 6128, 
monitor color, con sus manuales 
c instrucciones de utilizacion, 
unidad de disco adicional, 
impresora matricial, cassette y 
joystick. Ademas, 42 discos y 
20 cintas, ambos con juegos y 
programas de gestion, as! como 
de utilidades de sistema. 

Ademas originales de Base de 
Datos, Floja de Calculo, 
Tratamiento de Textos y dBase 
II, todos ellos originales y 
manuales de utilizacion. 
Interesados llamar de lunes a 
viernes, de 21 a 22 horas al tel. 
(93) 339 39 99, y preguntar por 
Ernesto. 


Hola, somos unos usuarios 
del Amstrad y deseariamos 
cambiar pokes para el CPC 464 
que escriban a Miguel A. Rincon 
Simon. Villardondiego, 27, l.° 

A. Vicalvaro. 28032 Madrid. Se 
les contestara rapidamente y 
que por favor que pongan la 
lista de pokes que quieran 
cambiar con nosotros. 


Vendo Amstrad CPC 6128, 
fosforo verde, con cable para 
conexion de cassette, 
compiladores Pascal (Hisoft y 
Turbo), nueve discos vfrgenes, 
numerosas utilidades y trucos 
(tanto cinta como disco), mas 
de 100 re vistas y suscripciones 
en AMSTRAD Semanal. 
Interesados escribir a Leonardo 
Janer Garcia. Rfus y Taulet, 47, 
5.°, l. a . Badalona. 


Vendo Amstrad CPC 6128, 
con monitor en color, cassette, 
joystick, 20 discos con 
programas de gestion, 
utilidades, lenguajcs, 
profesionales, juegos y coleccion 
de revistas de AMSTRAD 
Semanal. Equipo en perfectas 
condiciones. Llamar a: Carlos 
Vernet Saureu. Tel. (973) 

26 64 29 (noches). O escribir a: 
Avda. Blondel, 27. 25003 
Lerida. 


Ha nacido Soft Friends, tu 

club de soft. Para ordenadores 
Amstrad CPC 464. Spectrum, 
Commodore 64 y MSX. Para 
informacion manda nombre, 
direccion y dos sellos de 10 
ptas. (para gastos de envlo) a 
Soft Friends (Amstrad). Avda. 
Gasteiz, 17, 3.° C. 01008 
Vitoria (Alava). Intercambiamos 
ideas y programas, ademas de 
un folletin informativo mensual. 


Me gustarfa intercambiar 

todo tipo de programas con 
usuarios del Amstrad CPC 
6128 (especialmente de Ferrol). 
Escribir a David Souto Balado. 
Sartaha, 40, l.°. 15406 Ferrol 
(La Coruna). Tel. (981) 

31 83 98. Contestant a todos los 
interesados. 


Vendo Casio FX-750 
P + interface FA-20 + 2 tarjetas 
RC-4 (8 K) + cargador, ademas 
un microcassette 2 velocidades 
Sanyo con dos cintas. Perfecto 
funcionamiento. 45.000 ptas. 
Tel.: (94) 441 20 89 de 10 a 18 
h. o al tel. 443 02 34 de 10 h. 
en adelante. Preguntar por 
Miguel. Bilbao. 
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Desde lo mas profundo 

Por Carlos Aserantes 


Desde luego, que duda cabe, los efectos mas 
sorprendentes de cualquier ordenador suceden 
trabajando a bajo nivel, realizando llamada a 
las propias rutinas del ordenador, grabadas en 
el interior de su Rom. Por esta razon, 
bienvenidos sean los Calls y Pokes que en esta 
ocasion nos envfa Carlos. 

Poke 1,&C3: Anula cualquier llamada a Call 0. 
Poke 9, (un numero entre 4 y 12, ambos 
inclusive): El ordenador no obedece a ningun 
comando o funcion y responde con el mensaje 
Sintax error a todo lo que no sea un numero 
entre 1 y 65535, ambos inclusive. 

Poke 9, (un numero entre 13 y 15, ambos 
inclusives): Desordena elementos de la pantalla. 



Call &BA06 y 
Call &BA09: Cambio de 
caracteres para 464 en Mode 0. 

Call &BA03, Call &BA04 y 
Call &BA09: Idem para Mode 1. 

Call &BA03, Call &BA04 y Call &BA06: 

Idem para Mode 2. 

Call &BD11, Call &BD12 y Call &BD13: 
Hacen aparecer en pantalla el aviso 
«PROGRAM LOAD FAILED*. 

Desde Call &BD20 hasta Call &BD25 se 
provoca un rapido parpadeo de papel y borde. 
Desde Call &BD74 hasta Call &BD78 y desde 
Call &BD83 hasta Call &BD87 se provoca que 
la pantalla quede multicolor. 


Caracteres mas finos 

Por Francisco Cano 

El primero de estos trucos, sirve para cambiar 
el juego de caracteres del Amstrad. Tal como 
esta hace los caracteres del 32 al 128, todos los 
alfabeticos, considerablemente mas finos. 
Ademas, modificando el AND de la lfnea 40 por 
un OR, los caracteres apareceran notablemente 
mas gruesos. 

El segundo truco sirve para hacer mas facil la 
introduction de «datas» que lleven los listados 
cargadores de Codigo Maquina. Para ello hay 



que definir dos teclas, mediante las siguientes 
instrucciones: 

Key 10,“,” 

Key 1 l,chr$(13) + “data” 

Haciendo un auto al comenzar a «picar» los 
listados y pulsando Intro en vez de Enter saldra 
automaticamente el numero de lfnea y el 
comando Data. 

La primera orden Key, esta prevista para 
asignar al punto del teclado de funcion, la “,” 
con lo que podremos teclear todo el programa 
utilizando para ello esclusivamente el trozo de 
teclado numerico. 

10 REM programa para hacer 
20 REM los caracteres mas finos 
30 SYMBOL AFTER 32:hi=HIMEM+1 
40 MODE 1:LOCATE 4,11:PRIST ”Es 
pera ocho segundos” 

50 FOR bu-hi TO hi+768 
60 byte =PEEK<bu):byte2-INTCbyt 
e/2>:valor=byte AND byte2;POKE 
bn,valor 
70 NEXT 
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10 REM Agujero negro 
20 REM 

30 MODE 2:SPEED INK 100,100:IN 

K 1,26,15 

40 FOR i=l TO 500 

50 a=INT <RND*600) +10 

60 b=INT < RRDT380>+10 

70 PLOT a,b,1 

80 NEXT 

90 PLOT 320,200 
100 FOR n=1 TO 250 STEP 0.5 
110 DRAW 320-COS<n>*n,200-SIff' 
n)Tn,1 

120 MOVE 320,200 
130 NEXT 

140 PLOT 320,200 

150 INK 0,9,12:INK 1,0,26:BORD 

FT? 12 Q - SPEED T TJK 50 70 

160 FOR n=10 TO 250 STEP 0.5 

170 DRAW 320-CDSCn>*n,200-SINC 

n)*n,0 

180 MOVER 15,10 
190 NEXT 
200 GOTO 200 


ijeros negros 

Por Rocio Medina 

Los agujeros negros, objetos galacticos cuya 
existencia no esta probada, son quizas uno de los 
temas mas atractivos de la astroffsica. 

Con este programa podremos disfrutar de la 
creacion, ante nuestros ojos atonitos, de lo que 
para nuestra lectora podrfa ser uno de estos 
fenomenos, y que, aunque dista mucho de lo que 
en realidad sera uno de estos extranos objetos, 
sirve como excusa perfecta para crear un 
hermoso dibujo. 
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Algo esta en juego 


Por Marcos Martinez Hernandez 


Os envio unos cuantos Pokes y trucos para los 
siguientes juegos: 

— La clave de acceso a la segunda parte del 
Game Over es 10121. 

— Dos Pokes para el Ghosts’n Goblins: 

• Poke 20648, numero de vidas que deseemos 

(0 a 255). 

• Poke 34345,201, el dragon de la ultima fase 

no se movera. 


— El juego Sir Fred, si queremos pasar de la 
pantalla del puente, y no tenemos la Have 
amarilla, aconsejo que se haga lo siguiente: 
Ante todo hay que tener la espada. Cuando 
la tengamos entramos en la pantalla del 
puente rapidamente, desenvainamos la 
espada y retrocedemos lo mas rapidamente 
posible. Si todo va bien, deberemos 
aparecer dos pantallas a la derecha de la del 
puente, y solo tendremos que salir y subir 
por el puente. 

— En el juego 3D Fight, para pasar 
facilmente la pantalla de los meteoritos, 
tendremos que colocarnos en la esquina 
superior izquierda de la pantalla, de esta 
manera no chocaremos con ninguno. 


r* 



No se asuste 


Por Jordi Benet 

El resultado de este pequeno truco no vamos a 
revelarselo y lo dejaremos por ahora en el mas 
absolute secreto. Solo anunciarle que le 
sorprendera y, sobre todo, que no se asute, aqui 
no ha pasado nada. Una vez ejecutado el 
programa, no estarfa de mas que intentase 
arreglarlo pulsando la tecla ESC. 














PROGRAMAR ES BACH 

CRISTAL Y BORIAR 


Por Javier Barcelo 


Hasta ahora, los tratamientos de datos en PC, aunque 
extremadamente potentes, no acababan de estar lo suficientemente 
claros para el usuario medio que no acababa de encajar los 
gruesos manuales que siempre acompanan estos programas. Para 
estos ultimos Boriar puede ser una buena alternativa. 


lil auge de los ordenadores compatibles ha 
originado el nacimiento de una nueva generation 
de paquetes de Software. Dentro de esta 
generation destacan las bases de datos. 

Programas que en principio nacieron para que 
los usuanos sin conocimientos de programacion 
pudieran crear y mantener sus propios ficheros 
de datos, y que, paradojicamente, se fueron 
complicando hasta el punto en el que algunos 
paquetes necesitan para su manejo de horas de 
aprendizaje porque son... programables. 

Pero el paquete CRISTAL, que analizamos 
hoy, respeta el principio de no necesitar 
conocimientos para manejarlo con soltura. No 
obstante, si alguien quiere complicarlo dispone de 


un lenguaje de programacion, el BORIAR, que 
permite una gran complejidad no necesitando 
demasiado tiempo para manejarlo. 

Este paquete, como la mayoria de este tipo, 
tiene dos fases de uso diferentes. El simple uso de 
la base de datos CRISTAL y la programacion en 
BORIAR. 

La base de datos CRISTAL 

Cristal es una base de datos de gran potencia y 
cuyo uso resulta muy sencillo. Con ella se puede 
crear el fichero que se necesite y realizar en el 
altas, bajas, modificaciones, busquedas por 
campos indexados o no, asf como cualquier tipo 
de listado, incluyendo cartas y etiquetas. 
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Como funciona 

El funcionamiento de este paquete es similar al 
de los programas de varios lenguajes. Es 
necesario tener en el disco y/o directorio los 
ficheros .CHN principales, y bien los programas 
hechos por el paquete, o los nuestros, son 
compilados antes de ser ejecutados. De esta 
manera el funcionamiento de los mismos es muy 
rapido, aunque despues de cada modificacion del 
programa haya que pasar por el compilador. No 
obstante, esto es totalmente automatico cuando se 
intenta ejecutar un programa fuente. 


Mundo del 

PC 


marcos de una lfnea como de dos, se puede 
seleccionar facilmente este modo, y las teclas del 
cursor pasan de moverlo a dibujar las rayas 
seleccionadas. De este modo, encuadrar la 
pantalla y dividirla en zonas resulta cosa de 



Tanto los programas realizados manualmente, 
como los automaticos, pueden hacerse funcionar 
tanto desde la pantalla principal de CRISTAL, 
seleccionando EJECUTAR TAREA, como 
realizando menus y submenus, estructura esta 
que acepta sin problemas, y que tiene ademas la 
interesante posibilidad de poderse complementar 
con pantallas de ayuda, de manera que desde un 
menu, pulsando FI, aparezcan textos explicativos 
sobre las diversas opciones. Ademas, desde la 
configuracion se puede especificar un 
determinado menu para que se autoejecute al 
arrancar la aplicacion. 


Ahora solo nos queda 
etegir el tipo de 
programa que 
deseamos generar. 
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Una vez 
disenada la 
ficha, 
podremos 
guardarla, 
modificarla o 
pasar a su 
compilation. 


El editor de CRISTAL 

A diferencia de algunas bases de datos mas 
caras y famosas, los autores de CRISTAL han 
tenido el detalle de incluir un buen editor, tanto 
para texto como para facilidades graficas. El 
editor da todas las facilidades necesarias para 
escribir, ya sea una carta o un programa, y 
ademas incluye determinadas facilidades para 
realizar adornos graficos. Para empezar, a la 
hora de trazar recuadros de pantalla, tanto 


«coser y cantar». Pero esto no es todo. La tecla 
F7 permite fijar los colores que se deseen y 
cambiarlos cuantas veces se quiera, dando 
ademas la funcion de ayuda, la equivalencia 
entre los colores en la pantalla y el tipo de letra 
en la impresora, de modo que al imprimir 
tambien se puedan hacer distinciones. 

Por supuesto, el editor posee las facilidades 
habituales de margenes, justification y manejo de 
bloques, facilidad esta de simple uso y muy util 
programando, permitiendo incluso salvar bloques 
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El manejo 
del 

programa es 
simple, 
siempre 
auxiliado por 
menus. 



de programa por separado, con ,lo que realizar 
programas con partes de varios otros resulta mas 
facil. Por tanto, «Chapeau» al editor... 


Como crear un fichero 


opcion salva el dibujo de la 
pantalla, pero no salva las 
posiciones de los campos definidos. 

Si se vuelve a usar, para acabar el 
trabajo por ejemplo, habra que 
definir todos los campos otra vez. 

— SALVAR EN FORMATO 
BORIAR. Al reves que la anterior, 
esta opcion si salva las posiciones de 
los campos de la pantalla. 

— SALVAR Y GENERAR PROGRAMA. 
Esta es la opcion mas importante, pues salva la 
pantalla y eonecta con el generador de 
programas. 

Antes de acabar con esta parte, aclaremos que 
se puede indexar un fichero por hasta 99 campos, 
tomando en cuenta hasta 26 caracteres del 
campo. 


Lo primero seria crear el fichero. Para ello hay 
cjue dibujar una pantalla, poniendo las cabeceras 
de los campos que vaya a tener el fichero, asi 
como todos los detalles que vayan a aparecer. 

Esta sera la pantalla desde la que se maneje el 
fichero. Una vez creada, para definir los campos 
y sus posiciones, no hay mas que poner el cursor 
en la posicion inicial del dato en la pantalla, 
pulsar F3, llevar el cursor a la ultima posicion 
del dato y volver a pulsar F3. Entonces, aparece 
una pantalla donde hay que indicar el nombre 
del campo, si es literal, numerico o de fecha y si 
desea indexar el fichero por ese campo. En caso 
que el campo sea numerico, se pueden especificar 
el valor maximo y el mi'nimo que puede tener. 
Con todo esto se vuelve a la pantalla inicial, listo 
para definir otro campo. 

Una vez definidos todos los campos del fichero, 
pulsando la tecla ESC aparecen las opciones de 
salida, que son cinco. Aparte de las habituales de 
salir abandonando el trabajo realizado y 
continuar, estan tres muy importantes: 

— SALVAR EN MODO TEXTO. Esta 


Generador de programas 

Esta es, sin duda, la parte mas lograda del 
paquete. Una vez creada la pantalla y definidos 
todos los campos que van a formar el registro del 
fichero, el menu del generador de programas 
permite crear automaticamente un programa que 
realice las altas, modificaciones y bajas de datos 
en el mismo, as! como el o los programas 
necesarios para sacar listados de todos o parte de 
los datos, incluyendo la posibilidad de preguntar 
los llmites de los campos deseados entre los cuales 
queramos generar los listados, e incluso 
programas para generar etiquetas o cartas iguales 
ciue contengan datos del fichero. Resumiendo, un 
completlsimo sistema de MAILING, generado 
automaticamente. 

La mayor ventaja de este sistema es que si en 
un determinado momento se necesita un listado 
en concreto, que contenga datos de cualquier 
fichero ya creado, crear el programa que lo 
obtenga es cuestion de 10 6 15 minutos, y ya se 
tiene el programa para siempre. 


La 

presentacion 
del programa 
durante toda 
la ejecucion 
es sumamente 
esmerada y 
estetica. 















































Generador de ayudas 

Pero no es esa la unica facilidad de CRISTAL. 
Este paquete dispone de un interesantisimo 
programa generador de ayudas. Con el, en 
cualquier momento basta con pulsar la tecla FI 
para que aparezca una pantalla indicando las 
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El propio 
sistema 
incluye toda 
una serie de 
utilidades 
como: 
calendario, 
reloj o 
calculadora. 


funciones principales, la sintaxis de algun 
comando, etc. Y ademas, dentro del programa 
que se cree automatic amente para gestionar el 
fichero, se puede crear tambien pantallas de 
ayuda que CRISTAL integra en el programa 
principal por si la persona que lo va a utilizar es 
distinta de la que realizo el programa. 

Lfmites de CRISTAL 

Si fuese perfecto, a buscar otro trabajo, que 
dinamos los programadores. No lo es. Si bien, el 
programa que se genera maneja perfectamente 
los datos de un fichero, hay muchos momentos 
en los que es necesario combinar datos de varios 
ficheros, y esto no lo hace el generador 
automatico de CRISTAL Pero si ha llegado a 
este punto, ha generado sus programitas para 
manejar ficheros, y le gusta como funciona este 
paquete, y si ademas, ha tenido la curiosidad de 
echarle un vistazo a los programas fuente que se 
han generado, quiza le interese pasar a la 
siguiente fase poco a poco... Programar en 
BORIAR. 

Programar en BORIAR 

Mas de uno estara pensando ahora que esto 
consistira en aprenderse palabras en ingles, de 
significado dudoso y combinarlas de manera 
extrana. Ya le estara dando dolor de cabeza. 
Tranquilos, que esto tambien es mas facil. 

Evidentemente, no es ni tan facil ni tan rapido 


como el apartado anterior, pero aumenta la 
potencia de los programas de manera increfble 
para la dificultad que anade. El unico problema 
es que las instrucciones que acompanan el 
programa tratan exhaustivamente el apartado 
anterior, pero dejan este un tanto desatendido. 

No obstante, si se tienen a mano los listados de 
los programas generados automaticamente y se 
utiliza la funcion de ayuda de comandos 
(Mayusculas + F2), que da ejemplos de casi todo, 
con un poco de paciencia, como churros... 

Y es que la mayor ventaja del BORIAR es que 
es espanol. Para escribir en un fichero se dice 
ESCRIBIR, y la definicion de un dato es 
DATO... COMO... (Me explico? 

La programacion en BORIAR es muy 
estructurada. Para utilizar una variable hay que 
definirla antes, y los ficheros deben ser definidos 
al principio del programa. Estas y otras cosas 
pueden resultar un poco confusas para los que 
solo hayan hecho incursiones en Basic, pero no 
solo son necesarias, sino que ademas responden a 
los principios de programacion estructurada que 
sigue cualquiera que se llame programador... No 
se aprendera nada inutil. 

Los primeros pasos de programacion en este 
lenguaje suelen ser la modificacion de programas 
hechos automaticamente. Por ejemplo, uno de los 
problemas (relativos) notados es que si se define 
una pantalla con muchos campos, de manera que 
en alguna linea haya mas de un campo, el 
programa generado pregunta los datos de 
izquierda a derecha y de arriba a abajo. Y en 
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determinados casos, interesa que el orden de las 
preguntas sea distinto. Un buen ejercicio es 
cambiar el orden de las preguntas. Luego se pasa 
a comprobar que no haya datos duplicados... y 
asi. Naturalmente, esto es un ejemplo. Segun las 
necesidades del usuario, las modificaciones en el 
programa iran en uno u otro sentido. Y sin darse 
cuenta acabaremos haciendo nuestros propios 
programas. 

Una vez hecho el programa, se pasa a 
compilarlo. El compilador revisa el texto y si hay 
errores indica de que tipo son, y entra 
directamente en el editor y en la lfnea donde se 
produce el error, facilitando su correction, pero 
ojo con el error de variable no definida. En este 
caso el editor se situa en la linea donde aparece 
la variable, cuando la solucion al error esta mas 
arriba, en la zona de definicion de variables. 

Si la compilation acaba sin errores, el 
programa se autoejecuta para probar los 
resultados. Si estos son satisfactorios, adelante. 
Pero no conviene borrar los programas fuente, no 
vaya a ser que haya que modificarlo 
posteriormente. 


Facilidades suplementarias 

Pues si. Hay mas. En cualquier momento, 
tanto en la realization de un programa como en 
su posterior ejecucion se dispone de manera 
interactiva de una calculadora con las funciones 
habituales de aritmetica y memoria, para calculos 
rapidos. Tambien de esta misma manera se le 
puede echar un vistazo al directorio del disco, o a 
una tabla de caracteres ASCII, asi como disponer 
de un reloj con alarma, pudiendose utilizar la 
hora en algun programa. Y ademas, un 
calendario agenda que permite fijar fechas y 
apuntes, avisando en cualquier momento de una 


anotacion previamente grabada Por ultimo, 
tambien desde dentro de programas se pueden 
ejecutar comandos y programas externos, lo que 
de la posibilidad nada despreciable de combinar 
en un menu de cristal, programas propios de la 
aplicacion y programas de otros lenguajes. Por 
tanto, tambien sobresaliente en este aspecto. 

Configuracion 

Ahora que estan de moda los ldiomas, quizas a 
alguien le apetezca programar en ESPERANTO, 
o en TAGALO. Pues no hay problema. El 
programa de configuracion permite «traducir» 
todos los comandos y funciones a cualquier 
idioma o dialecto, teniendo unicamente la 
precaution de anotar la palabra en espanol y su 
correspondiente, para evitar fallos. Aunque es 
aconsejable realizar estos cambios teniendo una 
copia previa de la aplicacion, su instalacion es 
facil y no requiere ningun conocimiento especial 
Ademas, la configuracion permite fijar los valores 
por defecto de la impresora y la pantalla, asi 
como designar un programa para que se 
autoejecute al cargar el CRISTAL 

Conclusion 

Estamos ante un excelente paquete de base de 
datos. Es una lastima que los autores o 
importadores no hayan dedicado un poco mas de 
tiempo para hacer un buen manual de 
programacion, porque, ojo, la parte de manual 
que explica los primeros pasos de su 
funcionamiento y lo que es el generador de 
programas es muy bueno y clarito. Por lo demas, 
esta dificultad se suple con un poco de practica y 
el uso de la funcion de ayuda de los comandos de 
BORIAR, que resulta facil y rapida de usar. La 
presentation resulta impecable y los resultados 
obtenidos han sido francamente satisfactorios. 
Sobre todo, teniendo en cuenta que a nivel 
economico sale mucho mas barato que otros 
paquetes de posibilidades similares y manejo mas 
complejo. 
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